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IBM 1620/1710 DIPAL MONITOR 



This manual describes the features of the Disk Pack Library 
(DIPAL) and the operating procedure for the DIPAL Monitor 
as it is used with any 1620/1710 system having a 1311 Disk 
Storage Drive. Included is instruction for storing programs 
in DIPAL and for loading programs from DIPAL into 1620 
core storage. Familiarity with the operation and terms 
Bssociated with the 1311 Disk Storage Drive is assumed. 
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1.1 DIPAL Monitor is a 1620/1710 Customer Engineering 

■ utility program which enables a CE to aenerate a Disk • 
• Pack Library (DIPAL) for use on 1620/1710 systems 

having a 1311 Disk Storage Drive. The Monitor also 
provides two convenient methods for loading programs 
: from DIPAL into 1620 core storage. 

■ 1- 2,, What^Procrrams Can Be Stored In DIPAL? While DIPAL 

■ is primarily designed for convenient storage of mainten- 
ance programs, any program not using core positions 
18000 through 19999 can be stored in DIPAL. 

■ 1. 3 • Using DIPAL Monitor the CE Can: 

a. Store programs on the Disk Pack, one program 
per cylinder.' 

b. Add programs to the library at any time. 

c. Replace programs previously stored in the 
library. 

- : dr Obtain a list of all programs stored in the 

' library together with their cylinder addresses. 

e. Run any program in the library by loading the 
Program Call card for the desired program. 

f. Run under monitor control any program or 
sequence of programs, requesting each program 
by a name assigned when that program was stored" 
in DIPAL. 

1- 4 Equipment Requirements 

a. A 1620/1710 Modi or IL equipped with a 1311 Disk 
; Storage Drive. 

b. A disk pack, usually the CE disk pack, on which 
. the Monitor and the Library can be stored. 

1. 5 Storage Requirements 

- a. On the disk pack 

1. . The Monitor uses cylinders 4 and 5. 

■ 2. . The Library uses one cylinder per 

. " program,-- starti at cylinder 6. 

'"■.■'^^'r-d: . Cylinders 0-3, 35-37 and 96-99 are : 

. ■ . not used. . . ■ ; ■ 

b. - In 1620 core storage 

: The Monitor is stored in core at 18000 to 19999. 
^^^^^^^^^^ P^^ PN 2172363 EC ;til2SlU 
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SYSTEM OPERATION 



STOKING OIPAL AW PR06RAMS ON THE 
BISK PACK SECT 2.0 



SECT 2.1 



SECT 2^2 
j 01 PAL TAPE 1 



1620 
fitPAL 

PK06RAH 



MONITOR CALL 
CAW 




Pft06: SW1 SEE SECT 2.3 

SW2 ON: NON COHPATtBtE 

Off: COHPATISLt 

SVO OFF: PR06 ON CARDS 

ON: PROG ON TAPE 
$M«l OFF 



ADO I NO PR06RAHS TO THE DISK PACK 
REPUVC I WC PROGRAMS ON THE DISK PACK 
SEE SECT 2.3 




MODE 1$: 
ADD 

(TO ADO PROGRAHS) 



OUTPUT IS: CD (FOR CARD) 

TY (FOR TYPEWRITER) 




1620 01 PAL 
PROGRAM 




SYSTEM OPERATION 



MINNINC WMRAHS UNDER MONITOK CONTKOL SIE S€CT ).2 
FOR MANUAi CONTML set SECT 3. 1 



NOfllTOft 
CALL CARD 




IHONITOR CALL 
INSTR UCTIONS 



3<t0OO36 00701 
3600036 00702 
^O 1 000 00000 
001000 162 00100 



(1311 HEADbRf 
PROGRAM t 

(1311 OIPAL / 
PROGRAM i 



TYPEWRIT TEH 
INSTRUCTIONS 





TYPEWRITTEN 
INSTRUCTIONS 



NODE IS: RUN 

INPUT IS: TY (FOR TYPEWRITER) 

CD (FOR CARDS) 

PT (FOR PAPER TAPE) 

OUTPUT 1$; TY (FOR TYPEWRITER) 
CD (FOR CARDS) 
PT (FOR PAPER TAPE) 
NO (FOR NONE) 



ENTER STATEMENTS 

FOR STATEMENT OPTIONS SEE SECT. 1,2.2 



INPUT 
j CONTROL ST ATI 
IMENT VIA TY. 



INPUT 
CONTROL STATE- 
MENT VIA CD. 



j INPUT 
CONTROL STAT 
HENT VIA DT. 




OUTPUT 
CONTROL STATd 
MENT TO CO 
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2.0 



STORING PROGRAMS IN DIPAL 



The DIPAL Monitor is available in either card or tape versions. 
While the procedure will vary slightly depending on which version 
is used, the user is able to store card or paper tape programs in 
DIPAL using either version. Programs can be stored in DIPAL 
either right after the Monitor program is loaded or an ADD mode 
is provided in the Monitor which enables the user to store pro- 
grams at any time or to replace programs previously stored. 

Any program stored in DIPAL must have assigned to it a four 
digit DIPAL name. Also, certain "linkage" instructions must 
be added to the program to provide communication between the 
program and tiie monitor. Most 1620/1710 diagnostic programs 
have been modified to include a name and the required linkages. 
Programs that have been modified in this way are called DIPAL 
compatible programs. A list of the available compatible pro- 
grams together with the names assigned these programs is 
included in Section 6. To store programs which are not DIPAL 
compatible, follow the Instructions for non- compatible programs. 

Any time a program is stored in DIPAL, the DIPAL name assigned 
to that program and the file address at which it was stored will be 
typed on the console typewriter This is the Library List and it 
should be saved for future reference. This list is further explained 
in Section 2. 5. 

2. 1 Usincf the Card Version of the DIPAL Monito r 

Disk Pack Place a previously addressed Disk Pack . 

(usually the CE Disk Pack) on Disk Drive 
0 (If not addressed, use DT 0020 to ; 
address the pack}. 

Load Monitor Place the DIPAL Monitor pro c, ram in the 
card hopper and press LOAD. 

Check Switches Set to program 

MONITOR LOAD WILL BE PUNCHED ON THE 1622 
CARD PUNCH 

One card will be punched. This card is 
the MONITOR LOAD card. Label and 
save this card. 

MONITOR WILL LOAD TESTS ON THE 1311 

PLACE DL/\GNOSTIC PROGRAMS BEHIND MONITOR IN 

CARD STACKER - 

REFER TO PROGRAM DOCUMENTATION TO BE SURE 

PROGRAM IS COMPATIBLE . 

SW2 OFF IF PROGRAM IS COMPATIBLE 

AH 1620-11 progranris except DT 0100 are 
compatible. Other compatible programs 
are identified by a DIPAL name on the title 
page of the program documentation. 
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SW3 ON IF PROGRAM IS ON PAPER TAPE 



Non* Compatible 



CoJnpatible Card 
Programs 



Compatible tape 
programs 



Hote 



^ rrors 



Keyim CD 

A program call card will be punched 
after each -program is loaded. SAVE 
THIS CARD. For its use, refer to 
Sections. 1- 

To store non-compatible programs in 
DIPAXa, tarn SwUci i 2 on and "go to 
Section S.4. 

To store compatible card programs 
both Switch 2 and 3 must be off. Place 
programs in 1622 read hopper and 
press 1622 start. All programs will 
automatic^y be loaded into core and 
stored oa tbe file. 

To store compatible paper tape pro- 
grams. Switch 3 must be on and Switch 
2 off. lioa^g instructions will be 
printed o» console typewriter. 

To store c^rti programs after storing 
tape programs, turn Switch 3 off. 

To recover from an operational error, 
refer to Sec^n. 4. 



2. 2. UsiTiQ the Paijer Tais^ yerslcm the jpIPAI.< Motiitor 



Disk Pack 



l^iBd Monitor 



Place pre^ously addressed Disk Pack 
(usually the CB Disk Pack) on Disk Drive 
0 iU not addr^sed, ^ase DT 0020 to address 
the pack). . 

Place the DCPAL Monitor program on the 



paper taip^ jreader. Key in 30OOOCX) 00300 
Check Switches Set tp pro^i**aEn 

MONITOR WILL LOAD DIAGICOTXC TESTS OI^T TBE 1311 

vmm uomroB. halts wfm a 48 in the cs> hegistee 

PI^^CE tEE DMrnOD^ie^O^^ APPfiC^>EIAl^ IBPt^ 
DEVICE AND LOAD INTO COHE STORACE 
INOTEUCTIOHS m THE PEOC^.M DOClJMEl^ATIQN. 
1^2 01*1* IF PEOORAM IS CX^ 

. All i620^E programs e3£ce|4 OT 0100 
compatiMa. Other compatible progmms 
are idenf£5i^ by a DIPAL name on the title 

- pa^ga of the isrofram doci^sieatation. 
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EC ^mift 



Non- Compatible 
Programs , 



Key in: CD in no 1622 - key te TY) 

. A PrograjTi Call Card or ^ series of ■ 
uistructions will fo€ p\:mhed/ptinie^- . 
after each pr oar am is loaded. SAVE 

^TUESBCAsmMmmcrims. For 

'tlieir use,' refer to Section 3. 1. ■ ' ■ 

To store non«-compatible programs in 
DE-' AL, turn Switch 2. on and go to .,' . 
Section 2. 4. 



Compatible Car<! To store cornpatlbie card or tape pro** 
o^ Tape Programs grams, use standard loading procedures 
do not clear core. 



Errors 



To recover from an operational error, 
refer to Section 4. 



To Add Programs to the DIPAL I»ibrary or Replace Programs 

AlreadYvitt-te-IAbmry^:;-., ^ ' \ ., , - . ' 



D?jsk Pack 



Call McMPiitor 



Check Switches 
Delay 



Place the DIPAT.^ Disk Pack on Disk 
Drive 0. 

Use the Monitor Load Card to call the 
DtPAh Monitor into core storage, if 
iismg a tape system, key in: 

^ 340003000701- 
. 360CK)S600702 

OOlOOd 16200100 

Set to program 

There will be a delay due to the running 
of the header test. 



MODS IS To select the ADD mode, key in ADD 

SWl ON TO REPLACE PEOGRAM 

, ^ , ^ , , If SWl is turned on the Monitor will 

reqUe^^i a sedtdr address at which the' 
next program will be stored. Using 
this option, any previously stored pro- 
grams can be replaced with an updated 
program liavincj tiie same DIPAL name ' 
or with a new program having a different 
DIPAL name. V7ith Swl off, the program 
will be storedhstarting^atisihe-a^-avail- ' 
able cyUnder. 
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SW2 OFF IF PROGRAM IS COMPATIBLE 

SW3 ON IF PROGRAM IS ON PAPER TAPE (Card Version only) 



OUTPUT IS 



SEC Abb 



Note 



Npn» compatible 
Programs 

Cdmpatible Card 
Programs 



Compatible Tape 
Programs 



Brroi's 



This message requests the user to 
specify an output device for Program 
Gall instructions. 



Card System 
Tape System 



key In CD 
key In TY 



If replacing a program (SWl on )the 
sector address of that program must 
be entered. 

This address Is given on the Library 
List generated during loading (for 
explanation of format or Instructions 
for generating a new list, see Section 
2.5)... ■ 

To terminate program replacement 
disregard the last request for SEC ADD, 
press RESET and turn SWl off. Additional 
programs can then be added starting at 
the next available cylinder in the Library. 



To add non-compatible programs, 
SW2 on and go to Section 2. 4. 



turn 



To add compatible card programs, SW2 
and 3 must be off . Use standard card 
loading procedure - do not clear core. 

To add compatible paper tape programs, 
SW3 must be on and SW2 off. Use standard 
paper tape loading procedure - do not 
clear core. 

To recover from an operational error, 
refer to Section 4. . 



2.4::; :- To Store NON-COMPATIBLE Procrrams ■ 

Follow the DIPAL Store or Add procedure until directed to 
this section; 



Load Prbgrairi in- 
to Core Storage 



ADD LUnIKAGB 



Use standard load procedure for that 
program, card or tape (do not clear 
core). The program must not exceed 
core location 17999. 

Non- compatible programs lack the 
program linkage necessary to communi- 
cate with the Monitor, therefore, to run 
under Monitor Control, this linkage m\ist 
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be provided before the program is 
stored on the Disk Pack. If the non- < 
compatible program is to be run only 
under manual control no linkage Is 

■■rei^ired,';;..- 

To add the linkage, in place of the 
HALT at the end of the program, insert 
a branch to some available core location 
less than 17952. At that location, insert 
the following instructions: 

45 TYTY 18117 
49 18000 00000 
YYYYY 48 00000 00000 

49 START of program 

Where 18000 and 18117 are addresses 
in the Monitor program, YYYYY is the 
address of the HALT in this sequence 
of Instructions and START is the starting 
address of the non-compatible program. 



EXAMPLE 



Assume the last instructions in the program 
are as follows: 

02000 46 01000 00400 LOOP TEST. .•.SW4 
02012 48 00000 00000 FIALT 
02024 49 01000 00000 GO TO START 
02036 12 34567 890 DATA 
33 4445 

If storage space is available at address 
16000 the linkage instructions could be 
added as follows: 

a; Change the Halt at 02012 to 49 16000 OOOQp 

b. At 16000 enter: 

16000 45 01000 18117 

16012 4918000 00000 

16024 48 00000 00000 

16036 49 01000 00000 



Return to 
Monitor Gontrol 



Branch to 18000 



Key in the START addreiss of th^ hon- 
compatible program. 
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4 CHAR NAME FOLLOWED BY RM 

Key In an unique four character name 
for this test. Any alphameric characters 
except the Record Mark and Group Mark 
can be used. 

Note 1. Follow the above procedures for each 
non-compatible test to be loaded. 

2. To next load compatible tests, turn 
SW2off. 

Error To recover from an operational error, 

. refer to Section 4. 



The DIPAL Library Listing 

2* 5.1 Listing Description 

During DIPAL storage, the DIPAL name and disk 
storage address of each program stored is printed 
on the console typewriter. When adding programs 
to the library, a list is also printed of names and 
addresses of those programs which are added. 

In this list, the disk storage address of the program 
is given as a disk control field. The form is as 
follows: 

NAME A BBBBB COG 00000 ; .. .. 

Where A is the drive code 

BBBBB is the first sector a,ddress 
CCC is the sector count 

If output to the typewriter is requested during DIPAL ■ 
Load or ADD operations, Program Call instructions 
will also be typed for each program loaded. These 
instructions will appear on the Library List immed- / 
iately following the program name and disk address. 
This series of instructions can be used to call the 
program directly from the DIPAL Library independent 
of Monitor ControL 

2> 5. 2 To Obtain a New List '. 

Call Monitor Use Monitor Load Card or key in ; 

34 00036 00701 
36 00036 00702 
49 01000 00000 
001000 162 00100 

. . Delay There will be a delay due to the running 
of a header test. 

MODE IS Key in: LIST 
Page 11 PN 2172363 EC M125m 



3. 0 RUNNING PROGRAMS STORED IN DEPAL 



Programs stored in DIPAL can be called into core under either 
Manual or Monitor Call Control. Under Manual Control, each 
program is called into core by its own read file routine. This 
routine must be read into core through either the console type- 
writer or the card reader prior to calling each program. Using 
Monitor Control any series of programs can be requested. Each 
program called will run the number of times specified by its con- 
trol statement then the next program in the series will be called 
into core. 

3, 1 Manual Control 

Any program stored in DIPAL can be called into core 
storage by a read file from the cylinder on which that 
program is stored. As each program was stored in 
DEPAL a read file routine for the program was either 
punched on a Program Call Card or typed as part of the 
Library Listing. Any program stored in DIPAL can be 
called directly Into core storage by the Call Card for 
that program or by typing in the appropriate read file 
routine. 



Call Card 



Typewriter 



To call a program using the Program 
Call Card, place the Monitor pack on 
Disk Drive 0 then load the Call Card. 
The program will be read into core 
storage, then a branch will be executed 
to the program START address. 

To call a program using the console 
typewriter, key in: 

340003600701 
360003600702 
490000000000 
ABBBBBCCCOOOOO 

Where ABBBBBCCC is the DIPAL 
address of this program as given in 
the program listing. 

A is the Drive Code 

BBBBB is the Sector Address 

CCC is the Sector Count 



If not using 
Disk Drive 0 



The Disk Drive Code must correspond 
to the Disk Drive on which the pack Is 
located. 



Drive Code 

... ^o', 
■ ■■■■3. 
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Disk Drive No. 

■■■■■■ i:. ^■"7, ■ 

2 

3 ■:. 



3. 2 



Monitor Control 



Any program or group of programs can be run under 
monitor control. Programs can be run in any order and 
can be looped, either individually or as a group. 

Each program in DIPAL is identified by a four digit name. 
To run a series of programs under monitor control, the 
DIPAL name of each progrsun must be entered as a Control 
Statement. Statisments can be keyed in on the console 
typewriter or frequently used statement sequences can be 
read In from cards or paper tape. Provision is provided 
In the program to conveniently punch these cards or tapes. 

Z* 2.1 Monitor Control Set Up Procedure 

Disk Pack Place the DIPAL Disk Pack on 
Disk Drive 0. Manual control 
must be used to run from any other 
drive. 



Call : Use the Monitor Load Card to call 

Monitor the DIPAL Monitor into core 

storage. This card was punched 
when the DIPAL Monitor was 
loaded onto the disk pack. 

If using a tape system, key in: 

340003600701 
360003600702 
490100000000 
-00100016200100 



Header Test 



MODE IS 
INPUT IS 



Before the monitor program is read 
into core, a test is made of all 
functions required by the monitor. 
This runs approximately: 

1620 I - 30 sec. 
1620 n- 8 sec» 

If a failure is detected by this test, 
refer to Section 5 for suggested 
service procedures. 

To select the run mode, key in RUN 

This message requests the user to - 
specify the input device from which 
the control statements will be 
entered. 
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options Key in 



Typewriter 
Card Reader 
Paper Tape 



TY 

CD 

PT (after 

loading tape) 



OUTPUT IS 



This message requests the user 
to specify one of four options: 



Options 



a. Punch Control 

Statement Cards 

b. Punch Control 

Statement Tape 

c. List Control 

Statements 



Key -in - 



CD 



d. No Output 



PT 



TY 
NO 



With this option the user can 
simplify future set up by punching 
control statements on card or tape. 

ENTER The user is requrested to specify 

STATEMENTS the programs to be run by entering 
the appropriate control statements. 

The basic control statement is the 
DEPAL name. This is the four digit 
name used to identify the program 
in the Library Listing. For other 
Control Statements and statement 
options refer to Control Statement 
Options, Section 3.2. 2. 



Tjrpewrlter 
Entry 



Card Entry 



To enter control statements from the 
typewriter (TY keyed in following 
INPUT IS): 

; a. Key in statement (no spaces 
allowed) 

b* Press R-S after each statement. 

c. After last statement, key in 

: .GO 

To enter control statements from 
cards (CD keyed in following I NPUT 
IS): 

a. Place cards in 1622 read 
hopper 

b. Press 1622 START 
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Tape Entry 



To Bypass a 
Program 



To Call More 
Programs 



To Correct 
Errors 



To enter control statements from 
paper tape (PT keyed in following 
INPUT IS): 

If tape was not previously 
loaded, the 1620 will hang 
with a Reader-No- Feed. To 
recover, mount the tape, 
then branch to 10, 000. 

Any program can be bypassed after 
it is called into core by branching 
to 18000. 

When all programs requested have 
been executed, the message ENTER 
STATEMENTS is typed. A new 
sequence of statements can then be 
entered. 

If a typing error is made: 

a. Turn Switch 4 on 

■ b. Press R-S 

c. Enter corrected statement 

d. Turn Switch 4 off 

e. Press R-S 



If an error message is typed: 

a. Check Section 4 for explanation 
of error. 

b. Press START 

c. Enter corrected statement 

d. Press R-S 



3. 2. 2 Control Statement Options 

: While the basic control statement is the DIPAL 
name, additional statements are available to 
; increase the versatility of Monitor Control. 



Option 



Loop a Program 



Control Statement 



Follow the DIPAL name with a coma 
and any number between 1 and 99999. 
The requested program will be executed 
the number of times specified before 
the next program is called into core. 



Example: 



DTll, 25 

DT17 

GO 
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option 



Control Statement 



Note: PT OOIQ can not be looped. 



Loop a series of 
programs 



Note: 



To halt after 
any program 



To run all 
programs 



Follow the last test name in the 
series with the statement . LOOP,;^^^ :: : 
n, where n is any number between - 
1 and 99999. 

Example: 0101 
0102 
0103 

LOOP, 10 
, 0104 

The test series DTOlOl, 0102, and 
0103 will loop 10 times before 
DT0104 is executed. 

Loop statements must be separated 
by a GO statement. 

Enter the statement HALT. The . 
computer will halt with the last 
executed program still in core. 

Example: DT 11 

DT 17, 5 
HALT 
DT 18 

. ■. ■ ^00 ■ 

After running DTOOll five times, 
the computer will halt with DT0017 
still in core. Press START to call 
and run DT0018. 

Enter the statement ALL. All 
programs in DEPAL will be executed 
once in the order they were stored 
in the library. ALL must be the 
first instruction in the control 
sequence. GO is not required 
following ALL. 



3. 2. 3 Control Statement Input From Card or Tape 

■ Set up of frequently run test sequences can be simplified 
by placing the control statements for those test sequences 
on cards or paper tape. Control statement cards or 
tapes can easily be prepared any time a sequence of 
statements is entered during the RUN set up procedure. 

3. 2. 3. 1 To generate Control Statement Cards or Tapes 

Following the message OUTPUT IS: key in 
CD or PT 
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3.2.3.2 ■ ■ To enter staieiaents fro::^i Carcfe or Tapes 

P'oUowiixg &e message INPUT IS: key in 
CDorPT ■ ■ 

Note: If entering froro tape, mount tape before 
continuing. If tl'ie tape is not mounted 
before the message ENTER STATEMENTS 
is typed, the 1620 will hang up with a 
reader-no-feed. To recover, mount tape 
then branch to 10, 000. 

3.2.3.3 To get a. typewriter Hstinq of statements 
. ■ ehtei^d. vm eayci^^ 

Following the message OUTPUT IS: key 
in TY 

3. 2. 3. 4 Stackincf C^nata^bl Sequences 

V/hen entering statements from card or 
paper tape tiie statements will read in 
until either a GO command is encountered 
or the monitor e^cecution area is full. 
After all tests have run the message ENTER 
STATEMEHTS is t>'ped and the prooram 
will immetiiately attempt to read additional, 
statements from the designated input device. 
This featare allows you to stack statement 
sequences, ^tch setjience separated by a 
GO commaisd, or to stack an unlimited 
number o£ statements without exceedisg the 
capacity of tbe Monitor program^. 
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4.0 :EBDC^ItTFH^ ' 

- IS a t^rpfcf errot is made when enterin.g any requested. - ' 

■ 'T^ 

h. Press fi*S 

c. Key tn correct data 

■ ■.■ d. ./TuiPii. 3Witcli:4 off 
■ \e. ■■ ■■press;li*S: ■. 

, , ' ; 4:..2^ .■\ jLoadli[^^ Err<>gB ; . 

If an error, a parity diecJc for example, should occur 
while loading a pa^o^x^ S»to core: 

a. If this error is detected before the prograni is 
stored on the file, just reload the program. 

b* if the program has been placed on the file (in 
this case ^e name and address of the program 
will have been typed on the program list) continue 
loading programs. Replace the bad program later 
using the Add Qperatloii. 

CSV Error Messageg ■ 

Each reading or writing operation performed by the Monitor 
is verified. If an error is detected, an error message wiU 
be larinted out on tie typewriter. Also, each DXPAh BtsXe* 
ment and control function entered during set up of S^'O^R^ 
or RUN operations is ejatmined for proper format and correct 
order of input. 

If a file operation results in a file check, the monitor pro- 
gram will automatically re -execute that operation. No 
operator action is required to correct this error. If, 
however, the error is due to improper entry of a control 
statement or other illegal operator action, the computer 
v/ill HALT. To continue, press START and re-enter the 
statement in which the error occurred. 

.; - Error .Messages /Ee^ascin 

SR002 Head-back check for either a read or write 
disk operation. 

ER003 Format error; a DipaX statement is f oxidated 
iiapsrcf^erXy or out of sequence. 

EP,004 More tlian one LOO:grj^temer,t has been 
entered. (LOOP statements" muit''^*"" 
separated by a GO command, ) 

EROOS Not lUMid. 
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brror MessEges/Eeagon (continued) 

SR006 NAMB Statement contains more than four 
alphaniLrneric characters. 

EE007 An Illegal statement has been entered. Itiis 
is probably the result of mis-spelling or 
referring to a program name improperly. 

\ER008 No more cylinders are available on the 
Customer Engineer's disk pack to accept 
nev/ programs. 

lEROiO LOOP statement contains more than ten 
characters. 

EEOll A read-back check error occurred m^eii 
Monitor Control subroutine attempted to 
write Itself on the 1311 daring the Initial 
loading operation. 

EB012 A read-back check error occurred whtn 

the Load add subroutine attempted to write 
itself on the 1311 during an initial loading 
operation. 

ER013 A read-back check error occurred whek 
the Run subroutine attempted to write 
itself on the 1311 during the initial loading 
operation. 

ER014 A read-back check error occurred wuen 
the subroutines required by the 0IPAL 
statements GO, LOOP, or NAME, wej.^ 
written on the 1311 during the ittltlal loa^Bil§f 
operation. 

, ■ ■ ■ -■ 

ER015 A read-back check error occurred when ^€ 
updated areas of Monitor Control subrouttne 
were written on the 1311 during the initial 
loading operation. The updated ^eas contain 
the disk control fields of the RUM aiM! MmXiiot 
Control s^abroutines. 

£R0l6 (1) A read-back check occurred when the iMitli 
tables were written on the 1311 cbtring the 
initial lodding c^eratibii. - \- .v...;.: ^ 

(2) If replacisig progtmts, then the «^^^ 

atteinj^ting to replace prog^amei that iiot 
loaded . 

ER017 A read-back cheek occurred iiihen. t)^ mat^ 

tables were read from the 1311' after a 
Monitor call. 
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EROIS A read-back check error occurred when reading 
from the 13 tl those .sui»routine« required by a 

ER019 Ko convna in the tOOP statrement. 

ER020 The last core position of a program written into 
core storage exceeded location 18000. {This con- 
dLition clobisered tJie Monitor program; use ADD 
mode Section 2.B to restart.) 

ER022 An ALL statement is improperly us€; the ALL state- 
ment was entered following a staten^t ether than 

■ 'GO.. ■ ■ 

£11023 Kdnie statement with loop control contains more 
than 10 characters. 

ER024 Illegal character in number field of LOOP state- 
ment. 

Ot02S Illegal character in number field of state- 

■ ■ ment. 

ER026 An address check occurring when the header test 

is reading Monitor Control subroutine from the t31t. 

01027 An address check occurred when the Header Test 
attempts to write itself on the 13tt ^hiring the 
initial loading operation. 

ERllO A read-back check occurred when the updated por- 
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HEADER TEST 



When the DIPAL Monitor is called it is preceeded into core by 
a fault detection test. This test, called the Header Test, checks 
the operation of those 1620 functions which are required by the 
DIPAL Monitor. This test will loop 100 times before transferring 
control to the monitor program. Since this test is not intended to 
be a trouble shooting tool, no switch control options are available, 

5.1 Header Test Error Procedure 

If a failure is detected by the header test, the program 
will either hang up or type an error message. Since this 
test is not designed to be a diagnostic tool, the CPU diag- 
nostic should be called from DEPAL before attempting 
to continue . To call this directly from the disk file , use 
the Program Call Card or type in a read file routine as 
described in Section 3. 1. 

5. 2 To trouble Shoot Using The Header Test 

The header test consists of a series of short routines. 
In each routine, a single function is performed and 
checked. If an error is detected, the program will type 
a message and HALT at the end of the routine in which 
the error was detecte^d^^^^ The MAR register will contain 
the -Qi 1 address of this HALT instruction. Using this 
address, the specific routine detecting the error can be . ; 
located in the header test listing (the HALT is the last : 
instruction in each routine). 

The first Instruction in a test routine is identified by an 
SPS label of the form RXX or RXXX. This instruction is 
followed by a comment describing the test performed by 
that routine. 

Examine: Il4B BD *+60, Dt4-4, , 

■■rcty; 

WATY ER04 

wATYDsb :: 
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5.3 HEADER LISTING 



00010* 

00020**«*»«««»« 

00030* 
00040* 
00050* 

00060 00R6 

00070 DSC 

00080 DSC 

00090 OSC 

00100 DSC 

00110 DSC 

00120 DSC 

00130 DSC 
00140 , OSC 

00150 OSC 

00160 DSC 

00170 A DC 

00180 DC 

00190 B DC 

00200 DC 
00210* 

00220 DORG 

00230 DC 



DC 



00240 



00320 
00330 
00340 

00350 

00360 
00370 
00380 
00390 

00400 
00410 
00420 

00430 
00440* 
00450* 
00460 EROl 



MONITOR HEADER TEST 
BELOW ISA TABLE FOR SYNTHETIC COMPARE 



00400 

10,9999999990 
10f0099999999 
10f9009999999 
10f9900999999 
10»9990099999 
10,9999009999 
10,9999900999 
10,9999990099 
10,9999999009 
10,9999999900 
10,0123456789 

20,98765432109876543210 



00400 
00400 
00410 
00420 
00430 
00440 
00450 
00460 
00470 
00480 
00490 
00509 
00510 
00530 
00531 

00600 



00010 
00010 
00010 
00010 
00010 
00010 
00010 
00010 
00010 
00010 
00010 
00001 
00020 
00001 



DORG 

DSC 



00250* 
00260 
00270 SUM 
00280* 
00290* 
00300 

00310 RTOl NOP *4.24,,, 



600,,, 

50,07777777777077777777770777777777707777777777077777 

00649 00050 

50,77777077777777770777777T77707777777777077777777770 

00699 00050 



00800 

35 , 00000000000000000000000000000000000 
ROUTINE 01 
THIS ROUTINE TESTS NO OPERATION (41) 
DORG 01000 

CHECK NOP LIKE BRANCH 149) 



00800 
00800 



00035 



6 

RCTY 
WATY 



♦♦36,,, 

* , , 

EROl,,, 



01000 

OR BNI (47) 

01000 41 01024 
49 
34 



NOP *+24,0900,, 



6 

RCTY 
WATY 
NOP 

B 

RCTY 
VIATY 

B 



*+36,,, 
»»* 

ER01,,» 
*424,RM,, 



• • » 



♦♦36 
• » t 

ER01,,f 



01012 
01024 

TYPE NOP LIKE B (49) OR BNI (47) 

01036 39 

CHECK NOP LIKE BRANCH INDICATOR (46) 

01048 41 01072 
01060 
01072 
01084 
BNF (44) 
01096 
01108 
01120 



00000 
01048 00000 
00000 00102 



01157 00100 



TYPE NOP LIKE BI (46) 
CHECK NOP LIKE BO (43)* 



TYPE NOP LIKE BD (43) » BNF 



49 
34 
39 
OR 
41 
49 
34 



00900 
00000 
00102 
00100 



RT02 



» * * 



CONSTANTS 
OAC lltWOP 



FOR ROUTINE 
FA I LED • 



01 



01096 
00000 
01157 
BNR (45) 
01120 03339 
01144 00000 
00000 00102 
(44) OR BNR (45) 
01132 39 01157 OOlOO 
01144 49 01178 00000 



01157 00022 
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00470* 
00480* 



ROUTINE 02 
THIS ROUT rWETtST BIC4^) 



AND BNII^T) ON SM 4 



00490 RT02 - 


BC4 


»+72»»» 




BI (46) ON SWITCH 4 




01178 


46 


01250 


00400 


00500 


BNC4 


RT04f f • 




BNI <47) ON SWITCH 4 




01190 


47 


01354 


00400 


00510 


RCTY 










01202 


34 


00000 


00102 


00520 


WATY 


R2ER1*** 








01214 


39 


01323 


00100 


00530 


M 










01226 


48 


00000 


00000 


00540 


B 


RT04#»« 








01238 


49 


01354 


00000 


00550 


BNC4 


**24»t« 




BNI (47) ON SWITCH 4 




01250 


47 


01274 


00400 


00560 


B 


RT04f »• 








01262 


49 


01354 


00000 


00570 


RCTY 










01274 


34 


00000 


00102 


00560 


WATY 


R2ERl»f« 








01286 


39 


01323 


00100 


00590 


H 


f ♦ ♦ 








01298 


48 


00000 


00000 


00600 


B 


RT04»tr 








01310 


49 


01354 


00000 


00610* 


CONSTANTS USED 


IH 


ROUTINE 2 












00620 R2ERI 


DAC 


i6fB ON SW4 


FAILED* 




01323 


00032 




00630* 




ROUTINE 


04 












00640* 


THIS ROUTINE TESTS BRANCH ON DIGIT (43> 










00650 RT04 


BD 


*'»'60fDTtt 




BRANCH ON DKilT ON A 


1 


ODD 01354 


43 


01414 


02135 


00660 


RCTY 


f ♦ t 








01366 


34 


00000 


O0102 


00670 


WATY 


ER04f ft 








01378 


39 


02155 


00100 


00660 


WATY 


DlOftr 








01390 


39 


02267 


00100 


00690 


H 


• •f ' 








01402 


48 


00000 


00000 


00700* 




















00710 R4A 


BD 


**60fDT*2tr 




BRANCH ON DIGIT ON A 


2 


ODD 01414 


43 


01474 


02137 


00720 


RCTY 


f • • 








01426 


34 


00000 


00102 


00730 


WATY 


ER04»f • 








01438 


39 


02155 


00100 


00740 * 


WATY 


D20»f • 








01450 


39 


02279 


00100 


00750 


H 


• • ♦ 








01462 


48 


00000 


00000 


00760* 




















00770 R4B 


BO 


*4>60»DT*4»» 




BRANCH ON DIGIT ON A 


4 


ODD 01474 


43 


01534 


02139 


00760 


RCTY 


t • ♦ 








01486 


34 


00000 


00102 


00790 


WATY 


ER04f»t 








01498 


39 


02155 


00100 


00800 


WATY 


D40f 








01510 


39 


02291 


00100 


00810 


H 


• ; 








01522 


48 


00000 


ooooo 


00820* 




















00630 R4C 


BD 


*+60»DT*6»* 




BRANCH ON DIGIT ON AN i 


B ODD 




















01534 


43 


01594 


02141 


00840 . 


RCTY 


f ♦ » 








01546 


34 


00000 


00102 


00650 


WATY 


ER04 








01558 


39 


02155 


00100 


00660 


WATY 


D60tf 








01570 


39 


02303 


00100 


00670 


H 










01582 


48 


00000 


OOOOO 


00880* 




















00890 R4D 


BD 


**60»DT*T## 




BRANCH ON DIGIT ON A 


1 


EVEN 








00900 












01594 


43 


01654 


02142 


RCTY 










01606 


34 


00000 


00102 


00910 


WATY 


ER04ftf 








01613 


39 


02155 


00100 


00920 


WATY 


Dlftff 








01630 


39 


02315 


00100 


00930 


H 


f ft 








01642 


48 


00000 


OOOOO 


00940* 




















00950 H4E 


BD 


*460*0T*9ft 




BRANCH ON DIGIT ON A 


2 


EVEN 

01654 


43 


01714 


02144 


00960 


RCTY 


♦ ♦ t 








01666 


34 


00000 


00102 
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009T0 


WATY 


ER04t«r 






01678 


39 


02155 


OO 1 Afl 


00980 


WATY 


02Ef f • 






W AOT w 


if 7 




in A inn 


00990 


H 


9 w w ■ 












vwwy w 


01000* 






















^~Ov f U 1 ^ J, JIL i f 




\Jfi VtUi 1 


UW A ^ C Veil 








01020 














f •» 1 T f J. 

U J. 1 f 4 


02 146 


RCTY 








01726 


34 


00000 


00102 


01030 


WATY 


ER04fe • • 










Wb A 7 


Vv J,UV 


01040 


WATY 


D4E« • • 






01750 






00 1 oo 


01050 


M 


f # 9 ' 






V 4 f Oft 


4A 


00000 


00000 
wwww 


01060* 


















01070 R46 


BO 


*460«DT413 t • 


BRANCH 


ON bIGI T 


ON AN A I^VI^N 

01774 


41 


018 34 




01080 


RCTY 








01786 


34 


00000 


00102 


01090 


WATY 


ER04»ft 






01798 


39 


02155 


00 100 


01100 


. WATY 


08E»9f 






01810 


39 


02357 


oo 1 OO 


01110 




W F W 






01822 


48 


00000 


OOOft ft 


01120* 


















01130 R4N 




*<f24«DT<f 15* • 




fitdl T ON 


A 0 EVEN WITH A 7 IN ODD 














01834 


43 


01858 


ft 9 1 n 


01 1 40 


B 


1 V V f . 






01846 


49 


01906 


A A A A A 

UUwUW 


01150' 


RCTY 


• ft 






01858 


34 


00000 


00102 


01160 


WATY 


ER05f» • 






01870 


39 


02215 


00 1 oo 


01170 


WATY 


DO 70 






01882 


39 


02371 


00 100 


01180 


H 


t • • ■ . 






01894 


48 


00000 


00000 

W. V V w w 


01190* 


















01200 1(41 


BD 


*>249DT45«« 


BRANCH DIGIT ON 


A 0 EVEN WITH AN 


8 : 


IN ODD 














01906 


43 


01930 


02140 


01210 




R4'J> # # ' 






01918 


49 


01978 


AAA A A 
V w v\/V/ 


01220 


RCTY 


• ♦ »■ ■ 






01930 


34 


00000 


00102 


01230 


WATY 


ER05»f f 






01942 


39 


02215 


00100 


01240 


WATY 


D080#f ♦ 






01954 


39 


02407 


00100 


01250 


M 


9 9 9 






01966 


48 


00000 


00000 


01260* 


















01270 R4J 


„ BD 


*'*'24»0T>189» 


BRANCH 


ON DIGIT 


ON A 0 ODD WITH A 7 


IN EVEN 












01978 


43 


02002 


02153 


01280 / 


B 


R4K» »« 






01990 


49 


02050 


00000 


01290 


RCTY 


9 9 9 






02002 


34 


00000 


00102 


01300 . 


WATY 


ER05V»* 






02014 


39 


02215 


00100 


01310 


WATY 


DOTEf »• 






02026 


39 


02445 


00100 


01320 


. H 


#• • ■ 






02038 


46 


00000 


00000 


01330* 


















01340 fl4IC 


BO 


*'*-24«DT414f * 


BRANCH 


ON DIGIT 


ON A 0 ODD WITH AN 1 


B IN EVEN 


01350 - 










02050 


43 


02074 


02149 


■ B 


RT05#f f 






02062 


49 


02518 


00000 


01360 


RCTY 


• • • 






02074 


34 


00000 


00102 


01370 


WATY 


ER05#.f 






02086 


39 


02215 


00100 


01380 


WATY 


D08E»»« 






02098 


39 


02481 


00100 


01390 ' 


H 








02110 


48 


ooboo 


00000 


01400 


B 


RT05t»» 






02122 


49 


02518 00000 



01410* CONSTANTS USED IN ROUTINE 04 

01420 DT DC 2#01 02135 00002 

01430 DC l8t02G4D8102040800770 02153 00018 
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01440 ER04 


OAC 


30* BD (431 


OIO 


1 NOT BRANCH ON 


■ A t 

A ' 




V c A 9 9 


AAAiL A 




0)4I>0 FR04 


t/Al« 


9Aa an 1 A^ t 


BRANCHEO ON A 0 r 






02215 


00052 




01460 DIO 


OAr 

if 


Of* VL/l/ ' 










UZ2o7 


00012 






WAV. 


Of* v/Uly ' 










UZ279 


000 12 






WAV, 


Ot4 UDU* 










02291 


00012 








^ ^ A AAA ■ 










02303 


00012 




U150D Die 


OAC 


7«1 EVEN* 










02315 


00014 




A 1 Kin r\^c 
UIDIO Oct. 


DAC 


7»2 EVEN' 










02329 


00014 




01S20 D4I? 


OAC 


7.4 EVEN« 












00014 




01530 08E 


OAC 


T#8 EVEN* 










A 9 <9 ft T> 

02397 


00014 




Vl 1 Uv f u 


OAC 


16»EV£N WITH 


1 A 


7 0D0» 






02371 


00036 






OAC 


19.EVEN WITH 


AN 


I 8 000 • 






02407 


00038 




01960 r)07P 


OAC 


18 f COD WITH 


A 7 


' EVEN* 








00036 




01>(70 hOAP 


OAC 


19 • 000 WITH 


AN 


8 EVEN* 






A 9 A ft t 


00038 








ROUTINE 


05 














01S90* 


THIS R0U7INE TESTS 


r BRANCH NO FlAG (44) 










01600 11709 


BNf 


»+60tFT-'l»» 




BRANCH NO FLAG ON 


0 EVEN 


WITH NO 


FLAG 


















02518 


44 


02578 


02796 


RCTY 


f • • ■ 










02530 


34 


00000 


00102 




WATY 


ER06r»i 










02542 


39 


02799 


00100 




WATY 


EV€N»»t 










02554 


39 


02921 


00100 


U 1 640 




• 










02566 


48 


00000 


OOOOO 


01650* 




















f)1 AAA B44 


Mr 


•♦60»FT-2f» 




BRANCH NO FLAG 


ON 


0 000 WITH NO FLAG 




V X o r V 














02578 


44 


02636 


A 1 It n C 

02795 


RCTY 


'.♦ • • 










02590 


34 


00000 


00102 


01 6i0 

UJbOwV 


WATY 


ER06tf • 










02602 


39 


02799 


00100 


01690 


WATY 


000»f t 










02614 


39 


02931 


00100 


01 700 


H ; 












02626 


48 


00000 


OOOOO 


A 1 f % A» ■ 






















01720 R5B 


BNF 


>4.24rFT*3t» 




BRANCH NO FLAG 


ON 


FLAG 0 


EVEN 
02638 


44 


02662 


02794 




B 


R5C»tt 










02650 


49 


02710 


lOopoo 


01 740 


RCTY 












02662 


34 


00000 


'00102 


0 1 


WATY 


EROTf 










02674 


39 


02861 


00100 


U JL r OU 


WATY 


EVEN»»» 










02686 


39 


02921 


00100 


01 770 

U 1 f f u 


. H 












02698 


48 


00000 


OOOOO 


0171I0# 
























BNF 


»*2MFTtf V 




BRANCH NO FLAG 


ON 


FLAG 0 


000 

02710 


44 


02734 


02797 


A 1 HAA V 


B 


RT06#»» 










02722 


49 


02938 


OOOOO 


0 1JI1 0 


RCTY 


t • • 










02734 


34 


OOOOO 


00102 


VJLp£U 


WATY 


ER07>»t 










02746 


39 


02861 


00100 


At A1 A 


WATY 


000* f» 










02758 


39 


02931 


oolbo 


01S40 


H 


♦ t» 










02770 


48 


OOOOO 


A'AAA A 


01150 


B 


RT06#tf 










02782 


49 


02938 


00000 


01860* 


CONSTANTS USEO 


IN ROUTINE 05 














01$70 Ft 


OC 


4t-0000 










02797 


00004 




01680 ER06 


OAC 


31i BNF (44) 


OIO NOT BRANCH ON 0 


t 


02799 


00062 




01890 rR07 


OAC 


30 t BNF (441 


BRANCHEO ON FiAG 


0 * 




02861 


00060 




OlfOO CVEW 


OAC 


5»EVEN« 










02921 


00010 




OltlO 000 


OAC 


4f000» 










02931 


00008 




01920# 




ROUTINE 


06 
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OmO RT06 

01950 

01960 

01970 

01980 

01990» 

02000 l^6A 

02010 

02020 

02030 

02040 

02O50« 

020$0 R6B 

020T0 
02080 
02090 
02100 
021 10» 
02120 R6C 



02130 

02140 

02150 

02U0 

021t0» 

02180 iR6D 

02190 . 

02200 

02210 

02220 

02230 

02240* 

02250 

02260 : 

G22TO 

02280 

02290 

02300 . 

02310 

02320* 

02330- 

02340 

02350 nn 

02360 rR08 
02370 ER09 
02380 mi 
02^90 090 



THIS aouTIHg rests BRANCH NO RECORD MARK (45J 
BNR ♦♦60fRM-5»# BRANCH fiO RECORD MARK ON A 

RCTY 

WATY eR08#*# 
WATY D9ef ft 
H t»« 



BNR «4>60»RM->4«» 



BRANCH NO RECORD MARK ON A 



RCTY 
WATY 
WATY 
H 



ER08f •# 
090* f> 



BNR «460fRM-3t# 



BRANCH NO RECORD MARK ON A 



RCTY 
WATY 
WATY 
H 



f f » 

ER08t«t 
03Ef»* . 
» •# 



BNR •>60tRMf 0 



BRANCH NO RECORD MARK ON A 



RCTY 
WATY 
WATY 

H 



eR08«»» 
030* ft 



9 EVEN 






02938 


45 


02998 


03334 


02950 


34 


00000 


00102 


02962 


39 


03341 


00100 


02974 


39 


C3459 


00100 


02986 


48 


00000 


00 000 


9 ODD 








02998 


45 




03335 


03010 


34 


00000 


00102 


03022 


39 




rt A 1 Art 


03034 


39 


03473 


00100 


03046 


48 


oopoo 


00000 


3 EVEN 






03058 


45 


n 71 T 1 ft 


n ^ n •a A. 


03070 


34 


UUwU w 


An 1 A 9 


03082 


39 




AA 1 A A 


03094 


39 




A A 1 n A 


03106 


48 


00000 


00000 


3 ODD 








03118 


45 


03178 


03339 


03130 


34 


00000 


00102 


03142 


39 


03341 


00100 


03154 


39 


03499 


00100 


03166 


48 


00000 


00000 



BNR #+24»RM-l»r 

B R6E>f • 
RCTY **• 
WATY ER09tf» 
WATY EVEN* ft 

H 

BNR ♦♦24fRM-2»f 



BRANCH NO RECORD MARK ON RECORD MARK EVEN 

03178 45 03202 03338 

03190 49 03250 00000 

03202 34 00000 00102 

03214 39 03403 00100 

03226 39 02921 00100 

03238 48 00000 00000 

BRANCH NO RECORD MARK ON RECORD MARK ODD 



B 






03250 


45 03274 


03337 


RT07»Vt 




03262 


49 03510 


00000 


RCTY 


»# • 




03274 


34 00000 


00102 


WATY 


ER09»»# 




03286 


39 03403 


00100 


WATY 


ODD*** 




03298 


39 02931 


00 100 


H 


• ft 




03310 


48 00000 


00000 


B 


RT07 




03322 


49 03510 


00000 


CONSTANTS USED 


IN ROUTINE 06 








DSC 


4»993» 




03334 


00004 




DC 






03338 


00001 




DSC 


It3 




03339 


00001 




DAC 


31* BNR (45) 


DID NOT BRANCH ON A • 


03341 


00062 




DAC 


28f BNR (45) 


BRANCHED ON A RM » 


03403 


00056 




DAC 


7«9 EVEN* 




03459 


00014 




DAC 


6 #9 ODD« 




03473 


00012 
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02400 DIE 


OAC 


7r3 EVENi 






03485 


00014 




02410 030 


OAC 


6»3 ODD* 






03499 


00012 




02*20».'-;.-;. 




ROUTINE 


07 










02430* 


THIS ROUTINE TESTS TRANSMIT OIGIT IMMEDIATE 


(15) 








02440 R tot 


TOM 


•♦34»701f9f 




TRANSMIT DIGIT IMMEDIATE 1 


TO EVEN 






02450 


■ - 








03510 


15 


03544 


OOPOl 


00 


•♦36f»4-20#« 




CHECK TRANSMIT DIGIT LIKE 


TRANSMIT FIELD 




02460 










03522 


43 


03558 


03542 


BO 


E7Af601»i 




CHECK THAT I WAS TRANSMITTED PROPERLY 














03534 


43 


03594 


00601 


02470 


B 


R7Atti 






03546 


49 


03642 


00000 


02480 


RCTY 








03558 


34 


00000 


00102 


02490 


WATY 


ER35«»« 






03570 


39 


03991 


00100 


02500 


M 


. • • • : ^ ' ■ . 






03582 


48 


00000 


00000 


02510 C7A 


RCTY 








03594 


34 


00000 


00102 


02520 ^ 


KATY 


ONEtt* 






03606 


39 


04125 


00100 


02530 ■ 


WATY 


ER36 






03618 


39 


04049 


00100 


02540 V 


H 








03630 


48 


00000 


00000 


02550* 
















02560 RtA 


TOM 


•♦23»2»lOt 




TRANSMIT DIGIT 2 TO ODD 


03642 


15 


03665 


000-2 


02570 


BO 


•424f620»» 






03654 


43 


03678 


00620 


02580 


B 


R7B»»f 






03666 


49 


03726 


00000 


02590 


RCTY 


■ • • » 






03678 


34 


00000 


00102 


02600 


V»ATY 


TWO»»t 






03690 


39 


04135 


00100 


02610 


WATY 


ER36» • % 






03702 


39 


04049 


OOlOO 


02620 


M 


■fit 






03714 


48 


00000 


oooop 


G2630» 


















02640 R7B 


TDM 


•♦23»4»10# 




TRANSHIt OIGIT 4 TO ODD 


03726 


15 


03749 


000-4 


02650 


BD 


•4>24»640f • 






03738 


43 


03762 


00640 


02660 ' 


B 


R7C«f • 






03750 


49 


03610 


Ooooo 


02670 


RCTY 


• ■ 






03762 


34 


00000 


00102 


02680 


WATY 


FOR#»t 






03774 


39 


04145 


OOlOO 


02690 : 


WATY 


ER36f •» 






03786 


39 


04049 


00100 


02700 


M 


• tt 






0379C 


46 


ooopo 


00000 


02710* 


















02720 R7C 


TDM 


♦♦23f8»l0# 




TRANSMIT DIGIT 8 TO ODD 


03810 


15 


03833 


000-8 


0273O 


BO 


• 4-24»6609f 






03822 


43 


03846 


00660 


02740 


B 


RTOftf 






03834 


49 


03894 


00000 


02750 


RCTY 


♦ ♦♦ 






03846 


34 


00000 


00102 


02760 ' 


WATY 


ATEtr# 






03858 


39 


04155 


OOlOO 


02770 


WATY 


ER36»»» 






03870 


39 


04049 


OOlOO 


02780 


H 


• •f 






03862 


46 


00000 


00000 


02790* 


















02800 R70 


TOM 


♦♦22»»lOt 




TRANSMIT DIGIT 0 TO EVEN 


03894 


15 


03916 


000-0 


02810 


BO 


«>24i670»» 






03906 


43 


03930 


00670 


02820 


B 


END7»fi 






03916 


49 


04176 


00000 


02830 


RCTY 


• tt 






03930 


34 


00000 


00102 


02840 


WATY 


ZROttt 






03942 


39 


04167 


00100 


02850 


WATY 


ER36ttt 






03954 


39 


04049 


00100 


02860 


H . 


t tt : . 






03966 


48 


00000 


00000 


028^0 . 


B 


EN07ttt 






03978 


49 


04X76 


00000 


02f80* 


CONSTANTS USED 


IN 


ROUTINE 07 










01890 mi 
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29f TDM 1151 


ACTS LIKE TFM f 16r« 
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02900 Eft36 

02910 ONE 

02920 two 

02930 FOU 

029*0 ATE 

02950 2R0 

02960# 

02970 END7 

02900 

02990 

03000 

03010 

03020 

03030 

030*0 

03050* 

030«0« 



OAC 38f NOT TRANSMITTED PROPERLY BY TDMM5)» 

OAC 5» A 1» 

DAC 5# A 2« 

OAC 5# A *• 

DAC 6« AN e« 

DAC 5« AO* 

TOM RTO7432t0tl0 

TDM RT07*33#6»10 

TDM RT07+34»0,10 

TDM RT07+35tl»10 

TDM R7A*23#0,10 

TDM R7B*23»0.10 

TDM R7C423»0»10» 

TOM R7D*22»7»10f 

ROUTINE 08 
THIS ROUTINE CHECKS TRANSMIT DIGIT C25) 



040*9 00076 
04125 00010 
04135 00010 
04145 00010 
04155 00012 
04167 00010 



04176 15 
04188 15 
04200 15 
04212 15 
04224 15 
04236 15 
04248 15 
04260 15 



03542 
03543 
03544 
03545 
03665 
03749 
03833 
03916 



000-0 
000-6 
000-0 
000-1 
000-0 
000-0 
000-0 
000-7 



u ^ w f V n I w 


TDM 


**47f7»i 


INITIALIZE 


04272 


15 


04319 


00007 




TDM 


*459*0tt 


INITIALIZE 


04264 


15 


04343 


00000 




TO 


♦423»N0»« 


TRANSMIT 0 


04296 


25 


04319 


04550 




BD 


»448»607»t 




04308 


43 


04356 


00607 




TO 


•♦23»N8»» 


TRANSMIT 8 


04320 


25 


04343 


04552 


03120 


BO 


E6A»680f • 






43 


04416 


00680 


V J Jl «P V ^ 


h 


RT09»». 




04344 


49 


04554 


00000 




RCTY 






04356 


34 


00000 


00102 


03150 . 


WATY 


2R0«»f 




U4300 


39 


04167 


00100 


V J * w w . 


WATY 


ER37f #» ..■ 




043o0 


39 


04477 


00100 


03170 


B 


RT09»»» 




v4374C 


49 


04554 


00000 


03180 


H 


• • ♦ 




04404 


48 


OOOUO 


00000 


03190 E8A 


RCTY 


» » » 




04416 


34 


00000 


00102 


0S200 


WATY 


ATE * » » 




04426 


39 


04155 


00100 


0321O 


WATY 


ER37»»> 




04440 


39 


04477 


00100 


03220 


H 


t • t 




04452 


48 


ooobo 


00000 


03230 


B 


RT09«»« 




04464 


49 


04554 


00000 


03240* 


COf^STANTS USED IN 


ROUTINE 08 








03290 ER37 


DAC 


37» NOT TRANSMITTED PROPERtY BY TO 125) • 


04477 


00074 




03260 NO 


DSC 


02f 0« 




04550 


00002 




03270 N8 


DSC 


02»8» 




04552 


00002 




03280* 




ROUTINE 


09V- . 










03290* 


THIS ROUTINE TESTS SET FLAO 132) 










0330O RT09 


TDM 


WA9»2«* 


SET 2 IN EVEN WORK AREA 


04554 


15 


05526 


00002i 


03310 


SF 


WA9»#f 


TEST INSTRUCTION 


04566 


32 


05526 


OOOOOn 


03320 


BNF 


*-l>24*WA9tt 




04578 


44 


04602 


05526 


0333O 


B 


R9Af»# 




04590 


49 


04650 


00000^ 


03340 


RCTY 


« • » 




04602 


34 


00000 


OOIO2I 
00100 


03350 


WATY 


ER38»f» 




04614 


39 


05529 


03360 


WATY 


D2E*«» 




04626 


39 


02329 


00100 


03370 . 


H , 


♦ »f 




04638 


48 


00000 


QOOOC|| 


03380* 














03390 R9A 


TDM 


WA9*1«3»# 


SET 3 IN ODD WORK AREA 


04650 


15 


05527 


00003 


034?»0 


SF 


WA9^1»»f 


TEST SF 


04662 


32 


05527 


OOOOQ 


03«^10 


BNF 


*^24«MA94l»« 




04674 


44 


04698 


0552 1 


03420 


fl 


R9B»ff 




04686 


49 


04746 


00000 
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03^30 


RCTY 


9 9 9 




W *l'0 ^ V 




n A n n n 




03440 


WATY 


r\ w V w » 




A i. 7 1 n 






OUlOO 


03^50 


WATY 


ft « • 

*/ if w F V W 










00 JLOO 


034^0 


H 


AAA 

» ▼ ▼ 






L.Si 
HO 




r\n A A A 
w vuo 0 


03470* 














03480 


TOM 


WA9»9«1 1 * 


1 rLMU & in CVCrl Wvf\N 










03490 








04746 


15 


05526 


OOOOK 


SP 

w r 


W A9 a a A 

W W V ^ V » ^ 


TPCT CP 


A\ A *7 R O 


3d 




00000 


03500 


8HF 


*'^24*WA9t • 




04770 


44 


04794 


\f J J C V 


03510 


B 


R9C»« « 




047B2 


49 


04842 

V ^ v ~ fi» 


ooono 

WW WW V 


03520 


RCTY 


9 9 9> 




04794 


34 


W V V V V 




03530 


WATY 


ER36SF»*» 




04806 

w ~ w W V 


39 


0 5 & 0 1 


00 1 on 


03540 


WATY 


F2E*9» 




04818 


39 


05677 


00 100 


03550. 


H 


9 9 9 - 




04830 


4fi 


00000 


ocono 

www V 


03560* 
















03570 H9C 


TOM 


WA9'»>lt3«ll» 


SET FLAG 3 IN ODD WORK . 


AREA 
















04842 


15 


05527 


OOOOL 

W V W v* %w 


03580 


SF 


WA94-1»#» 


TEST SF 


04854 


32 


05527 


00000 


03590 


BWF 


•424»WA94>lt« 




04866 


44 


04390 


05527 


03«00 


B 


R9D»»f 




04878 


49 


04938 


00000 


03610 


RCTY 


9 9 9 




04890 


34 


00000 


00102 


03620 


WATY 


ER38SF»»f 




04902 


39 


05601 


00100 


03630 


WATY 


F30«9» 




04914 


39 


05701 


00100 


03640 




1 1 • 




04926 


48 


00000 


00000 


03650* 
















03660 mo 


TDW 


WA9«»» 


SET RECORD MARK IN EVEN 


WORK AREA 














04938 


15 


05526 


00000 


03670 


DC 


1»»»*» 


DEFINE RECORD MARK IN Oil ON PREVIOUS INST* 










04949 


00001 




03680 


• SF - 


WA9»«9 


TEST SF 


04950 


32 


05526 


00000 


036fO 


BHf 


^•»-24$WA9»« 




04962 


44 


04986 


05526 


03700 


S 


R9£»*» 




04974 


49 


05034 


00000 


03710 


KCTY 


9 9 9 




04986 


34 


00000 


00102 


03720 


WATY 


£R38ft«9 




04999 


39 


05529 


00100 


03730 ^ 


WATY 






05010 


39 


05723 


00100 


03740 
03750* ■ 


M 


t 9 t ... 




05022 


48 


00000 


00000 


03760 $t9£ 


TO 


WA9-»-l »WA9»« 


SET FLAG RECORD MARK IN 


ODD WORK 


AREA 




03770 








05034 


25 


05527 


05526 


SF 


WA9+l9«» 


TEST SF 


05046 


32 


05327 


00000 


03T@0 


SNF 


*4>249WA94>lff 




05058 


44 


05082 


05527 


03790 


B 


R9F»»» 




05070 


49 


05130 


00000 


03S0© 


RCTY 






05062 


34 


00000 


00102 


03810 ' 


WATY 


ER38SF«*» 




05094 


39 


05601 


00100 


03020 , 


WATY 


FRMO»»« 




05106 


39 


05757 


00100 


03830 ^ 


H 






05118 


48 


00000 


00000 


03840* 
















03850 R9F 


TOM 


WA9+1»2»» 


SET 2 IN ODD WORK AREA 


05130 


15 


05527 


00002 


0f®60 


SF 


WA94-l«e» 


TEST SF 


05142 


32 


05527 


00000 


03170 


8NF 


«4.24tWA9+i»» 




05154 


44 


05178 


05527 


ossso : 


S 


R96*«« 




05166 


49 


05226 


00000 


03<I90 


RCTY 


»♦•■'. 




05178 


34 


00000 


00102 


03900 


WATY 


ER38»tf 




05190 


39 


05529 


00100 
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03f 10 
03f30» 

03^50 

03f6O 

03970 

03980 

03990 

04000 

04010 

04020* 

04030 R9H 



04050 
04060 - 
04070 
040S0 

04090 

04100 
04110» 
04120 R9I 

04130 
04140 
04190 

04U0 
04170:. . . 
041S0 ■ 
04190 
04200 
04?t0« 
04220 WA9 
04230 ER38 

04240 innsf 

04290 f2i 
042*0 P30 
04270 RME 
04280 FRWO 

04290 F20 
04300 r3S 
04310* 
04320* ■ ■ ■ 
04330 RTOlO 
•04340 ■ 
04390 

04340- .■: 

■ 04370 • 
04380 
04390 ; 
O440O# * 
04410 SlOA : ' 



WATY 


D20f f • 






09202 


39 




00 inn 

WW aU W 


H ; 








09214 


48 


00000 


00000 


TDM 


WA9 63** 


SET 3 IN EVEN WORK 


AREA 


09226 


1 K 




000Q3 


SF 


WA9f f ♦ 


TEST SF 




05238 




A ft C ^ J* 


A AAA A 

wwwOO 


BMP 








09290 


44 


rt 11 o A 
0 :) 2 74 


A K e *t it. 

05526 


B 


R9H*tf 






09262 




0*4 '312 5 


vww w w 


RCTY 


f ^ 9 






05274 




A Art rtrt 


A A 1 A 0 

UUXu2 


WATY 


ER38»itt 






05286 






A A 1 A A 
WW iU W 


IIATY 


D^Ef •# 






09298 






f\n \ ft A 
wU iy w 


H 








09310 


48 


00000 

VWV WW 


w w W W W 


TOW 


WA9*lf2»llV 


SET FLAG 2 IN ODD WORK AREA 








Sf 


WA94-1** 

W i'^ ▼ Ji V V 






09322 


1 9 


w99« f 


° AAAAV 


TEST SF 




05334 




'•PlIDrikf' 


A A AAA 

ggggg 










09346 




05370 


A t% ft "> T 

0352 7 


n 








09358 




A K A i O 


A A A A A 

UOvOO 


RCTY 


• A 4 

• w V 






09370 




A A A Art 


A A 1 A "5 

vUi02 


HATV 

WW t T 








09382 


1 O 

jy 


A C C A 1 

05601 


00100 




F20** A 






09394 


3y 


AC cfeA 

; 05779 


OOlOO 


M 








09406 




A AH inn 

WVIU WW 


A A A A A 


TOM 


WA9*3«11* 


SET FLAG 3 IN EVEN 


WORK 


AREA 
















09418 


1 % 


AR K > 


AA AAI 


SF 


WA9ff» 


TEST SF 




09430 


32 


09926 


nnoA A 


BHF 


«'f24»WA9t* 






05442 


44 


05466 


V -» 3 fc 0 


8 


RTOlOt** 






05454 


49 


05844 


A A A A A 


«CTY 


• • • 






05466 


34 


00000 


00 1 A5 
WW i W£ 


WATY 


ER38SF«** 






09478 


39 


05601 


AA 1 A A 

WW igg 


WATY 


F3E»t» 






09490 


39 


09821 


A A 1 A A 
WW XU V 


M 








09902 


48 


00000 


w w w w w 


B 


RT010»t, 






09914 


49 


05844 


AAAA A 
VWWU W 


CONSTANTS USED IN 


ROUTINE 09 












DSC 


2»00 






0992^ 


00002 




OAC 


36» SET FLAG 132) DID NOT SET FLAG ON • 


09929 


00072 




OAC 


38fSF (32) DID 


NOT FUNCTION PROPERLY ON 


• 05601 


00076 




OAC 


12#FLA6 2 EVEN* 






05677 


00024 




DAC 


11»FLAG 3 ODD» 






05701 


00022 




OAC 


ITtRECORD MARK 


EVEN* 




09723 


00034 




DAC 


2lfFLAG RECORD 


MARK ODD* 




09797 


00042 




OAC 


11«FLA6 2 ODD* 






05799 


00022 




DAC 


12»FLAG 3 EVEN* 






05621 


00024 






ROUTINE 


10 












THIS ROUTINE TESTS 


► CLEAR FLAG 133) 












TDM 


WA9v2f» SET 2 


! IN WORK AREA EVEN 




09844 


19 


05526 


00002 


CF 


WA9»f • TEST 


CF 




09856 


33 


05526 


00000 


8NF 


♦460#WA9ff 






05866 


44 


05928 


05526 


RCTY 


«»» 






05880 


34 


00000 


00102 


WATY 


ER39CFf«t 






09892 


39 


06793 


00100 


WAtY 


D2f»f# 






09904 


39 


02329 


00100 
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09916 


48 
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00000 
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19 


05$27 


00002 
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04420 


CF 


WA94l««# 
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33 


05527 


00000 


04430 


BNF 


♦♦60»WA94lf t 








05952 


44 


06012 


05527 


04440 
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ttt ^ 








05964 


34 


00000 


00102 


04450 


WATY 
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05976 


39 


06793 


00100 


04460 


WATY 


D20f •# 








05988 


39 


02279 


00100 


04470 
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06000 


48 


00000 


00000 


044§0» 




















04490 tnot 


TDM 


WA9t3t* 


SET 


3 IN 


WORK 


AREA EVEN 06012 


15 


05526 


00003 


04500 


CF 


WA9«tr 








06024 


33 


05526 


00000 


04510 


BNF 


••t>6p*WA9*t 








06036 


44 


06096 


05526 


04520 


RCTY 


• »t 








06046 


34 


00000 


00102 


04530 


WATY 


ER39CF»#t 








06060 


39 


06793 


00100 


04540 


WATY 


03E*«t 








06072 


39 


03485 


00100 


04550 


H 


• tff 








06084 


48 


00000 


00000 


04540» 




















04570 nice 


TOM 


WA94l*3f f 


SET 


3 IN 


WORK 


AREA ODD 06096 


15 


05527 


00003 


045«0 


CF 


WA94l»«, 








06108 


33 


05527 


00000 


04590 


BNF 


•♦60tWA9<t'lt* 








06120 


44 


06180 


05527 


04i00 


RCTY 
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06132 


34 


00000 


00102 


04410 


WATY 


ER39CFf#i 








06144 


39 


06793 


00100 


04420 


WATY 
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39 


03499 


00100 


04*30 


H 










06168 


48 


00000 


00000 


04440« 














04650 RIOD 


TOM 


WA99 2tllf 


SET 
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2 IN 


EVEN WORK AREA 
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06180 


15 


05526 


OOOOK 


CF 
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33 


05526 


00000 
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BNF 


•460»WA9»f 
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44 
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05526 


04680 


RCTY 
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34 
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00102 


04690 


WATY 
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39 


06709 


00100 


04700 


WATY 


F2Ef ft 








06240 


39 


05677 
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04710 
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06252 


48 
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TOM 
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2 IN 
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06264 


15 


05527 
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04740 


CF 
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44 
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• ♦ • 








06300 


34 


00000 


00102 


04770 


WATY 


ER39rf« 








06312 


39 


06709 


00100 


04760 


WATY 


F20rtf 








06324 


39 


05799 


00 100 


04790 


H . .■. 


.. 








06336 


48 


00000 


obooo 


04600* 




















04610 moF 


TDM 


WA9»3»n» 


SET 


FLAG 


3 IN 


EVEN WORK AREA 








04620 












06348 


15 


05526 


OOOOL 


CF 


WA9t»» 








06360 


33 


05526 


00000 


04630 


BNF 


•♦60fWA9ff 








06372 


44 


06432 


05526 


04840 


RCTY 


f #• ■: ■■. 








06364 


34 


00000 


00102 


04850 


WATY 


ER39##r 








06396 


39 


06709 


00100 


04660 


WATY 


F3Ettt 








06408 


39 


05621 


00100 


04670 


H 


fit 








06420 


46 


00000 


00000 


04680* 




















04690 RIOG 


TOM 


WA94>1«S,1I, 


SET 


FLAG 


3 IN 


ODD WORK AREA 








04400 












06432 


15 


05527 


OOOOL 


F 


WA9*ltff 








06444 


33 


05527 


00000 
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0#*10 


mr 


♦•»^60iiirA94-itt 


06456 


44 


06516 


03527 


0*f 20 


RCTY 


■ » ♦ » 


06468 


34 


00000 


00102 


04f30 




EK39»9f 




39 


06709 


V w A V W 


04t*0 


WAtY 


F30»»f 


06492 


39 


05701 


00100 


04fSO 


H . 


i*# ■■ 


06504 


48 


OOOOO 


OOOOO 
















o^fjo Men 


TOM 


tfA94>l«»t 


SET RECORD MARtC IN ODD WORK AREA 














06516 


15 


05527 


OOOOO 


04900 


DC 


I • • •* 




00001 




0^^990 


CP 


WA94-lff» 


06528 


33 


05527 


OOOOO 


05000 


BNF 


♦♦40«WA9*1 


06540 


44 


06600 


05527 


05010 


ftGTY 


• • f 


06552 


34 


OOOOO 


00102 


05020 


WATY 


ER39CFftr 


06564 


39 


06793 


OOlOO 


05030 


HATY 




06576 


39 


06869 


00100 


05040 


M 




06586 


48 


OOOOO 


OOOOO 


05050* 












05060 ftlOl 


TOM 


WA9f«> 


SET RECORD WARK IN EVEN WORK AREA 








Dt 




06600 


15 


05526 


w w w w w 


050T0 


06611 


00001 




050tO 


SF 


MA9»«* 


06612 


32 


05526 




05090 


CF 


WA9»«» 


06624 


33 


05526 




05100 


BWF 


»+60»lfA9«» 


06636 


44 


06696 


V i>r <• w 


05110 


RCTY 


» • » 


06648 


34 


OOOOO 


00102 

W W A W £ 


05120 


»#ATV 


Eil39»9 0 


06660 


39 


06709 


oo t nn 

WW 4 WW 


05130 


WATY 


FRME»»t 


06672 


39 


06901 


00100 


05140 


H 




06684 


48 


OOOOO 


OOOOO 


05150 


B 


RT012 


06696 


49 


06944 


OOOOO 


05I&0* 


CONSTANTS USED IN 


ROUTINE 10 








051T0 tR39 


DAC 


42» CLEAR FLAG 


<33) DID NOT CLEAR FLAG FROM • 














06709 


00C84 




05180 gR39CF 


OAC 


38»CF 133) DID 


NOT FUNCTION PROPERLY ON » 06793 


00076 




05190 nm 


DAC 


16»REC0RD MARK 


ODD* 06869 


00032 




05200 mm 


OAC 


22»FLA6 RECORD 


MARK EVEN* 06901 


00044 




052 10» 














05220* 




ROUTINE 


12 ■ 








05230* 


THIS ROUTINE TESTS TRANSMIT FIELD IMMEDIATE (16) 








05240 1IT012 


TDM 


WA12»7f* 


RESET WORK AREA 06944 


15 


08065 


00007 


05250 


TDM 


WA12-2»»» 


RESET WORK AREA 06956 


15 


08063 


OOOOO 
., w w w w w 


05240 


tFM 


KA12»77712»710»TRANSMIT 2 DIGIT POSITIVE FIELD 














06968 


16 


08065 


P77-J2 

f t Ww 


05270 


BD 


E12A»WA12-2»»f 


CHECK TRANSMISSION TERMINATION 








052S0 


TD 




06980 


43 


07064 




♦♦23fWAl2it 


06992 


25 


07015 


V u w o 


05290 


BD 


C12B9620** 


07004 


43 


07112 


00620 


05300 


TD 


*+35.WA12-l»» 


07016 


25 


07051 


08064 

w w w w ▼ 


05310 


CF 


•'f23i»t 


07028 


33 


07051 


OOOOO 


05320 


BD 


E12B«6l0t» 


07040 


43 


07112 


00610 


05330 


B 


R12B»»» 


07052 


49 


07184 


OOOOO 


05340 tl2A' ••^ 


RCTY 


• » « 


07064 


34 


OOOOO 


00102 


05350 


WATY 


ER41f •# 


07076 


39 


08069 


00100 


05!*40 


M 




07088 


48 


OOOOO 


OOOOO 


osito 


B 


R12B»»f 


07100 


49 


07181^ 


OOOOO 


053S0 E12B 




,»#•.■.•■. 


07112 


34 


OOOOO 


00102 
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05390 


¥A7Y 


ER42ftf 










07124 


39 


08145 


00100 


03400 


WNTY 


TFMl-2t»t 










07136 


36 


08462 


OOlOO 


05410 


WA7Y 


WAS»9« 










07148 


39 


08451 


00100 


05A20 


WHTY 


WA12-lt»» 










07160 


38 


08064 


00100 


05430 


M 


• •• 










07172 


48 


00000 


00000 


b5440» 






















05450 R12B 


TDH 


WA12»7t« 










07184 


15 


08065 


00007 


05460 


7DM 


WA12-3f #• 










07196 


15 


08062 


00000 


05470 


7FM 


WA12»77124»9* 


TRANSMIT 


3 


DIGIT POSITIVE 


FIELD 


















07208 


16 


08065 


77J24 


05480 


BD 


E12C»WA12-3** 










07220 


43 


07328 


06062 


05490 


TO 


*423«WA12»f 










07232 


25 


07255 


08065 


05500 


BO 


C12D»640«« 










07244 


43 


07376 


00640 


05510 


TO 


•♦23»WA12-lff 










07256 


25 


07279 


08064 


05520 


BO 


E12D»620** 










07268 


43 


07376 


00620 


05530 


TO 


•♦35»WA12--2»t 










07280 


25 


07315 


08063 


05540 


CF 


•4^23f 










07292 


33 


07315 


00000 


05550 


BD 


E12Df6l0f» 










07304 


43 


07376 


00610 


05560 


B 


R12C»f» 










07316 


49 


07448 


00000 


05570* 


















05510 CJ2C 


RCTY 


t»» ' 










07328 


34 


00000 


00102 


05590 


WATY 


ER41»t» 










07340 


39 


08069 


00100 


05600 


M 












07352 


46 


00000 


00000 


05610 


6 


R12Cft»« 










07364 


49 


07448 


00000 


05620 C12D 


RCTY 


1 1 • 










07376 


34 


00000 


00102 


05630 


WATY 


ER42f»« 










07388 


39 


00145 


00100 


05640 


WNTY 


TFM2-3»#» 










07400 


38 


08465 


00100 


05650 


WATY 


WASftt 










07412 


39 


00451 


00100 


05660 


WNTY 


WA12-2V«t 










07424 


38 


08063 


OOlOO 


05670 


M 












07436 


48 


00000 


00000 


056S0» 


















05690 «12C 


TDM 


WA12t7»f 










07448 


15 


08065 


00007 


05700 


TfM 


WA12»1248f811f 


TRANSMIT 


.4 


DIGIT NEGATIVE 


FIELD 






















07460 


16 


08065 


0J24Q 


05710 


BNF 


E12E»WA12-*3t»f 


CMECIC 


FIELC 


DEFINITION 


07472 


44 


07628 


08062 


05720 


BNF 


E12FtWAl2f»f 


CHECK 


SIGN 




07464 


44 


07676 


08065 


05730 


TO 


•+35»WA12»» 










07496 


25 


07531 


08065 


05740 


CF 


♦4^23»»t 










07508 


33 


07531 


00000 


05750 


BD 


E126f680f • 










07520 


43 


07724 


00680 


05760 


TD 


♦+23»WA12-ltf 










07532 


25 


07555 


08064 


05770 


BD 


E12G»640«f 










07544 


43 


07724 


00640 


05700 


TD 


♦♦23»WA12-2»t 










07556 


25 


07579 


08063 


05790 


BD 


El2Gv620t« 










07568 


43 


07724 


00620 


05800 


TD 


«435tWAU«-3#» 










07580 


25 


07615 


08062 


05810 


CF 


•♦23»tt 










07592 


33 


07615 


00000 


05820 


BD 


E12G»610*f 










07604 


43 


07724 


00610 


05830 


B 


R12D»rf 










07616 


49 


07796 


00000 


05840 C12f 


RCTY 












07628 


34 


00000 


00102 


05850 


WATY 


ER43»«# 










07640 


39 


08255 


00100 


05860 


M 












07652 


48 


00000 


00000 


05870 


B 


R12Dft» 










07664 


49 


07796 


00000 


05810 tur 


RCTY 


f f f 










07676 


34 


00000 


00102 


05890 


WATY 


ER44»t» 










07688 


39 


08357 


00100 
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n 


♦ • • 






07700 


48 


00000 


coooo 


05? 10 


.... 8 


R12D»ft 






07712 


49 


07796 


OOOOO 






»♦ • 






07724 


34 


00000 


00102 




■ WATT 


ER42i»f 






07736 


39 


08145 


00100 


05H0 


WNTY 


TrM3-4»t# 






07748 


38 


08469 


00100 


05950 


WAtY 


WAS*** 






07760 


39 


08451 


00100 


05f oO 


WW TV 


WA12-3** 






07772 


38 


08062 


00100 


05970 




■ •#* ■ 






07784 


48 


00000 


OOOOO 


05980* 














Q5990 ^120 


TDM 


WA12*7*t 






07796 


15 


08065 


00007 


A A AAA 


TFM 


W Al 2 • 1 2410 * 71 1 * TRANSM I T 5 DIGIT NE6AT IVE 


FIELD 






06010 


T& : 








07608 


16 


0806^5 


J248- 


•♦35*WA12** 






07820 


25 


07655 


08065 


A Jt A 4 A 


CF 


♦♦23*** 






07832 


33 


07855 


OOOOO 


A A A 1 A 


■k A 

BD 


E12H*607*t 






07844 


43 


07976 


00607 




TA 

ID 


♦♦23*WA12-1** 






07856 


25 


07879 


08064 




Aft 


E12Hf6S0*« 






07868 


43 


07976 


00680 


A ^ A^ A 


TD 


*-«-23*WA12-2** 






07880 


25 


07903 


0S063 


A A A 'V A 

06070 


BD 


E12Hf640t* 






07892 


43 


07976 


00640 


A it Ail A 


T A 

» D 


♦423*WA12~3»* 






07904 


25 


07927 


08062 


06090 


BO 


E12M*620*« 






07916 


43 


07976 


00620 


A & M A A 

U610U 


TO 


•♦35*WA12-6»* 






07928 


25 


07963 


08061 


Aa « f a 
vol 10 


Cr 


•♦23* •» 






07940 


33 


07963 


OOOOO 


06120 


80 


E12Ht610** 






07952 


43 


07976 


00610 


A £ i 4 A 


B 


RT013*t* 






07964 


49 


08480 


OOOOO 


06140 E12M 


RCTY 


*»♦ 






07976 


34 


00000 


00102 


A A t ic A 

06150 


WATY 


ER42»»* 






07988 


39 


08145 


00 100 


A/L « A ' 


WNTY 


TFM4-5*** 






08000 


38 


08474 


00100 


WATY 


WAS* 9 * 






08012 


39 


08451 


00100 




WNTY 


WA12-4*** 






08024 


38 


08061 


00100 


JL7U 


H 


» * • 






08036 


48 


OOOOO 


OOOOO 




8 


RT013*** 






08048 


49 


08480 


OOOOO 


06210* 


CONSTANTS USED IN ROUTINE 12 








06220 WA12 


DC 


6*000000 






0806<} 


00006 




06230 


DC 


1*»*» 






08066 


00001 




06240 E«4l 


DAC 


30* TFM (16) WAS 


NOT 


TERMINATED PROPERLY* 


08069 


00076 




06250 ln^^2 


OAC 


36* TFM (16V DID 


NOT 


TRANSMIT PROPERLY* 


08145 


00072 




06260 


DAC 


19* SHOULD HAVE BEEN 


1 


08217 


00038 




06270 E^43 


DAC 


41* TFM (16) DID 


NOT 


SET FIELD DEFINING FLAG 









06280 
06290 IR44 

06300 WAS 
06310 TFMt 
06320 tFM2 

06330 t^H» 
06340 tFM4 
06350^ 
06360* 
06S70 llT0i3 
0^$^ 



08255 00082 

DAC 10* PROPERLY* 08337 00020 

DAC 47* TFM (16) DID NOT SET FIELD S I <iN FLAG PROPERLY* 

08357 00094 

DAC 6* WA$ • 
DC 3*12» 
DC 4*124» 
DC 5*-l248« 
DC 6*-l2480« 

ROUTINE 13 
THIS ROUTINE TESTS TRANSMIT FIELO( 26) 
TOM WA13*0i207*8* 
TF WAl3**-3#» TRANSMIT 



08451 00012 
08464 00003 
08468 00004 
08473 00005 
08479 00006 



08480 15 08661 



2 DIGIT POSITIVE FIELO 

08492 26 08661 



0J207 
084^9 
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06390 


TO 


«-»'23tWA13f • 




08504 


25 


08527 


06400 


BO 


E13At620»t 




08516 




W O 1 o 


06410 


TO 


•♦35.WA13-1»» 




08528 


25 


08563 


06420 


CF 


♦•«'23»»t 




08540 


33 


08563 


06430 


BO 


E13Af610»t 




08552 


43 


08576 


06440 


6 


RT019»«« 




08564 

W w ^ W 


49 


w o < to 


06450 E13A 


RCTY 






\t 9 J 1 V 


34 


00000 


06460 


WATY 


ER49f»* 




08588 


39 


06665 


06470 


WNTY 


TFl-2»»» 




08600 


38 


08772 


06480 


WATY 


WAS* • f 




08612 


39 


08451 


06490 


KNTY 


WAl3-lt» 




08624 


38 


0S660 


06500 


H 






08636 


48 


00000 


06910 


B 


RT019»»# 




08648 


49 


08776 


06520» 


CONSTAHTS USED IN 


ROUTINE 13 








06530 WA13 


OC 


2*00 




08661 


00002 


06940 


DC 






08662 


00001 


06590 ER49 


DAC 


47* TF (26) DID NOT TRANSMIT PROPERLY 


• SHOULD HAVE 




06960 








08665 


00094 


OAC 


7» BEEN • 




08759 


00014 


06970 TFl 


OC 


3«12« 




08774 


00003 


06980* 




ROUTINE 


19 








06990» 


THIS ROUTINE CHECKS BRANCH AND TRANSMIT 


IMMEDIATE 


(17) 


06600* 




AND BRANCH BACK (42) 








06610 tT019 


TFM 


6019*1 tO*10» 




08776 


16 


08871 


06620 


TOM 


•♦29»1.» 


MAKE INST* BELOW A NOP 


(41) 














08788 


15 


08813 


06630 


BTM 


6019»12»10t 




08800 


17 


08872 


06640 


40 


♦>48»»» 


CHANGED TO NOP (41) OR 


BRANCH (49) 












08812 


40 


08660 


06690 


RCTY 






08824 


34 


00000 


06660 


WATY 


ER4ef •* 




08836 


39 


09053 


06670 


M 


f •» 




08848 


48 


00000 


06680 


B 


CICK9»*0 




08860 


49 


09244 


06690 6019 


TOM 


RT019437»9ti 


MAKE INSTRUCTION ABOVE 


A BRANCH 


(49) 












08872 


15 


08813 


06700 : 


TO 


*+23t60l9-'l»t 




08884 


25 


08907 


06710 


60 


E19*6209« 




06896 


43 


09004 


06720 > 


TO 


•♦35fG0l5-2tt 




08908 


25 


08943 


06730 - 


CF 


«+23*»» 




08920 


33 


08943 


06740 


80 


E15»610»» 




08932 


43 


09004 


06790 


BB 


♦♦12»f • 


BRANCH BACK 


08944 


42 


08956 


06760 


RCTY 


♦ • t 




03956 


34 


00000 


06770 


WATY 


ER49*»» 




06968 


39 


09107 


06780 


H 






08980 


48 


00000 


06790 


B 


CKK5»»» 




08992 


49 


09244 


06800 £19 


RCTY 


9 99 




09004 


34 


00000 


06810 


WATY 


ER9a««f 




09016 


39 


09173 


06120 


M 


99 9 




09028 


48 


00000 


06830 


e 


CKK5**f 




09040 


49 


09244 


06840*' 


CONSTANTS USEO IN 


ROUTINE 19 








06890 tR48 


OAC 


27« BTM (17) FAILED TO BRANCH* 


09053 


00094 


06060 CR49 


OAC 


33* BB (42) DID NOT BRANCH PROPERLY* 


09107 


00066 


06370 E«90 


OAC 


36» BTM (17) DID NOT TRANSMIT PROPERLY* 09173 


00072 



06661 

00620 
08660 
00000 
00610 
00000 
00102 
00100 
00100 
00100 
00100 
00000 
00000 



000-0 

00001 
000J2 

00000 
00102 
00100 

boooo 

00000 

00009 
06671 
00620 
08870 
00000 
00610 
00000 
00102 
00100 
00000 
00000 
00102 
00100 
00000 
00000 
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ROUTINE 18 




THIS ROUTINE CHECKS AOO 




TFM 


CKKl*llf 00400 




TDM 


CKKl ♦23*00000 


A ^ M <■! A ' 


TOM 


RZUltl 


AX ttfK A 


TDM 


RZ2+1»1 




TDM 


R23>l»i 




TOM 


Ri4*l»i 




TDM 


RZ5-fi»l 


wo T f V/ 


TDM 


R26*l#l 


WW y 0 w 


TDM 


RZ74-1,1 




TDM 


RZ8*1»1 


W f W WW . 


TDM 


RZ9*lf 1 


w f w 1 W . 


TFM 


•♦18 • SUM 


A7A^A« 






fi 7 ft lift ' CMtf" 
w f w5U v,^^ 


TR 


00800 fB- 19 


070411 
w 1 w^w 


A 


SUM4"19#A 


A7ACA 

U f U 3 w 


CF 


SUM* 10 


w r wuw 


BNF 


•♦24*SUM+10 


n707ft 
w r w r V/ 




ERROR 


ft 7ftft A4» 






ft7n<lft ftt1t% 
U f WTU vIVKl 


TFM 


•♦47»0040G 


071 Oft 
W f 1 WW 


TDM 


#♦34 t 00000 


ft 7 1 1 ft« 






ft71 l>ft 
w f IcU 


TD 


•♦23»SUM-f 10 


07190 

W t A .7 W 


8D 


ERROR #00 400 


071 4,0 


: TF ; 


.♦♦.35#*-l- ... ' 


071 lOfi^ 






071 AO 

W > * W V 


TD 


♦♦23 • SUM ♦II 


071 70 
w 1 « r w 


BD 


ERROR »00400 


071 iO 

w r A 0 W 


TF 


♦♦35**-^l 


ft71 4lft« 
u r ATI/* 






ft 79ftA 


TD 


♦♦23»SUM^12 


ft 7 9 1 ft 


80 


ERRORt00400 


A 9 A 


TF 


•♦35t«-l 


A T 4 4 AM 

07230* 






A *y '9 A A 

0 f 2*0 


TD 


•♦23tSUM^13 


A 7 9 ft A 

07290 


BD 


ERROR 9 00400 


072i0 


TF 


♦♦35»»-l 


A'y9 7 A« 

U f i f W* 






AT^ft A 

0 f 2»0 


TD 


•♦23tSUM+l4 


ft7'I^Oft 


BD 


ERROR #00400 


07100 


^rTF- 


♦♦35 f*- I 


ft7^ 1 n« 

U. r 5 J. w» 






A94 4 A 


TD 


♦♦23»SUM^15 


07330 


BO 


ERROR 900400 


0T3%0 


TF 


♦♦35»^-l 


0T350# 






073*0 


TD 


♦♦23tSUM^16 


0T3T0 


80 


ERROR *0040a 




TF 


♦♦35t*-i 








07490 


TD 


♦♦23t^UM^I7 



21) 



09244 


16 


09459 


-0400 


09256 


15 


09471 


POOOO 


W7COO 




nop 9 1 


rjA A A1 
UvUUl 


09280 


15 


09881 


00001 


09292 


15 


09941 


00001 


09304 


15 


10001 


00001 


09316 


15 


10061 


00001 


09328 


15 


10121 


00001 


09340 


15 


10181 


00001 


09352 


15 


10241 


00001 


09364 


15 


10301 


00001 


09376 


16 


09394 


-0800 


09388 


31 


00800 


00511 


09400 


21 


00819 


00509 


09412 


33 


00810 


00000 


09424 


44 


09448 


00810 


09436 


49 


10696 


00000 


09448 


16 


09495 


•>0400 


09460 


15 


09494 


00000 


09472 


25 


09495 


00810 


09484 


43 


10696 


00400 


09496 


26 


09531 


09495 


09508 


25 


09531 


00611 


09520 


43 


10696 


00400 


09532 


26 


09567 


09531 


09544 


25 


09567 


00612 


09556 


43 


10696^ 


00400 


09568 


26 


09603 


09567 


09580 


25 


09603 


00813 


09592 




1 t\f%9f% 

A W W 7 W 


ftft^Aft 


09604 


26 


09639 


09603 


09616 


25 


09639 


00814 


09628 


43 


10696 

* W W F w 


00400 

W W*tW w 


09640 


26 


09675 


09639 


09652 


25 


09675 


00815 


09664 


43 


10696 


00400 


09676 




09711 


09675 


09688 


25 


09711 


00616 


09700 


43 


10696 


00400 


09712 


26 


09747 


09711 


09724 


25 


09747 


00817 
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07410 


BD 


ERRORf 00400 


09736 


43 


10696 


00400 


07420 


TF 


**35»»-l 


09748 


26 


09783 


09747 


07430* 












07440 


TD 


•423#SUM4l8 


09760 


25 


09783 


00818 


07450 


BD 


ERROR f 00400 


09772 


43 


10696 


00400 


07460 


TF 


*+35#*-.l 


0978A 


26 


09819 


09783 


07470» 














07460 


TD 


**23»SUM'M9 


09796 


23 


09819 


00819 


07490 


BD 


ERROR 900400 


09808 


43 


10696 


00400 


07500* 














07510 mi 


NOP 


#4-60 


09820 


41 


09880 


00000 


07520 


TOM 


CKK46»00001 


09632 


15 


09394 


00001 


07550 


TOW 


CKK1423*00001 


09844 


15 


09471 


00001 


07540 


TDM 


**35*00009 


09836 


15 


09821 


00009 


07550 




CKK 


09868 


49 


09388 


00000 


07560* 




. ■■ 










07570 «2 


NOP 


♦+60 


09660 


41 


09940 


00000 


07580 


TDM 


C»CIC+6t00002 


09892 


15 


09394 


00002 


07590 


TDM 


CKKl+23f00002 


09904 


15 


09471 


00002 


07600 


TDM 


*-35*0O009 


09916 


15 


09881 


00009 


07610 


B 


CKK 


09928 


49 


09388 


00000 


07620* 














07630 ftZ3 


NOP 


#♦60 


09940 


41 


10000 


00000 


07640 


TOM 


CKK+6»00003 


09952 


15 


09394 


00003 


07650 


TOM 


CKICl+23t00003 


09964 


15 


09471 


00003 


07660 


TDM 


*«35»00009 


09976 


15 


09941 


00009 


07670 


B 


CKK 


09988 


49 


09388 


00000 


07660* 












07690 R24 


NOP 


♦♦60 


10000 


41 


10060 


00000 


07700 


TDM 


CKK-t-6* 00004 


10012 


15 


09394 


00004 


07710 


TDM 


CKK 1+2 3 900004 


10024 


15 


09471 


00004 


07720. 


TDM 


*-35»00009 


10036 


15 


10001 


00009 


07730 


B 


CKK 


10048 


49 


09388 


00000 


07740* 














07750 R25 


NOP 


*+60 


10060 


41 


10120 


00000 


07760 


TDM 


CKK+6#00005 


10072 


15 


09394 


00005 


07770 


TDM 


CKK 1+23 #0005 


10084 


15 


09471 


00005 


07710 


TDM 


*-35»00009 


10096 


15 


10061 


00009 


07790 




CKK 


10108 


49 


09388 


00000 


07S00* 














07610 R26 


NOP 


♦♦60 


10120 


41 


10180 


00000 


07620 


TDM 


CKK+6f 00006 


10132 


15 


09394 


00006 


07630 


TDM 


CKKl+23t00006 


10144 


15 


09471 


00006 


07640 


TDM 


••35 #00009 


10156 


15 


10121 


00009 


07650 


■ _B- 


CKK 


10166 


49 


09388 


00000 


07660* 














07670 W7 


NOP 


*+60 


10180 


41 


10240 


ooooo 


07860 


TDM 


CKK+6#00007 


10192 


15 


09394 


00007 


07890 


TDM 


CKKl+23#00007 


10204 


15 


09471 


00007 


07900 


TDM 


*-35 #00009 


10216 


15 


10181 


00009 


07910 


• 


CKK 


10228 


49 


09388 


OOOOO 


07920* 














07930 RZ6 


NOP 


*+60 


10240 


41 


10300 


OOOOO 
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07940 


TOM 

' wn . 


jT^H^^tA^OOOOA 
vNN~OfWWwwO 


W f ^ 3 W 


TOM 


rif If 14>9'9I » 000 OA 
V^K !,▼(£ • www WO. 




1 UR 


■«A^K_nOOAO 


ft707rt 






07<lfl0# 










^▼o w 


V, W w V V 


TOM 


rKK 4-1^ >OOOOQ 


0 801 0 


TOM 


rif If 1^911 * OOOOO 


0S090 


TOM 


Ik A. OOOOO 


080^0 
wow J w 


■ n"- 




O AOAn» 






V/O w P w" 






vOwOU 






Oil 070 

1/ w V f V- 


1 OW 




U 0 00 u. 


. o • 




0 Anon* 

UO WT u* 






n It 1 n n 

V O i U w 


WOK 


•♦36 


n A 1 1 n 


Tun 


m_t 1 .AAAnil'- 
1 tWWOUT 


Oft 1 90 


. D 




WO I . 






OA 1 40 


MAD 




Ofll <iO 


TOM 


•—I 1 aOOOOO 

4 f WWWWTF 


0A1 &0 


■w ■ 


ricif A 


OA 1 70* 






OA t iio 


MAD 






TfMi 


•^i Y ^ A An AO 


0A900 

w o c W W 


o 


(TV it A 


Oft 9 1 0* 

woe Jt w* 






nfti»9n 

UOXcw 


Ifv/r 


•▼36 


nA9^n 




M^t t .AAAAO - 
•••i i f UwUU7 


Oft9ikO 

W O £ W 




rittt 9i 
w KkK 9 


V/ O t i? w 






08260 


NOP 


~«'W 


0ft?70 

WW*. 1 w 


TOM 


1 * 00000 
*JI»wwww;^ 


08280 






w V y w 






Ofi'lOO 

W W ^ V V 


NOP 


" ▼ 3 w 


oamo 

W W «7 A W 


TOM 


••oi l .OOOOO 

"^""lifwWWWJF 


OII^9d 
wwatw 


ft 


rif If A 

vA^9. 


0A'tilO# 

Uwj^ww 






Oft^AO 
vl O JHy 






OA^t^O 


TftM 

1 UJn 


•<b1 1 aAOAOO 


08360 


ft " 

Br 




V V a# f W " 






089 8 (A 

V W J w W 


NAP 


#i»>^A 


V V aM^ 7 V 


TDM 


*•! 1 • 00009 

" * » w WW WW y 


08400 


B' ^ 


CICK5 


08410# 






08420 




RT019 


08430* 






08440 ERROR 


RCTY 




06450 


WATY 


ER21 


08460 


ft 


RT019 



1 n 1 ft. o 

10292 


l9 


09394 


00008 


10264 


9 e 

l9 


09471 


00008 


10276 


15 


10241 


00009 


10288 


49 


09368 


OOOOO 


10300 


41 


10360 


OOOOO 


10312 


15 


09394 


00009 


10324 


15 


09471 


00009 


10336 


15 


10301 


00009 


10348 


49 


09388 


OOOOO 



10360 41 10396 OOOOO 
10372 15 10361 00009 
10364 49 09244 OOOOO 

10396 41 10432 OOOOO 
10408 15 10397 00009 
10420 49 09244 OOOOO 

10432 41 10468 OOOOO 
10444 15 10433 00009 
10456 49 09244 OOOOO 

10468 41 10504 OOOOO 
10480 15 10469 00009 
10492 49 09244 OOOOO 

10504 41 10540 OOOOO 
10516 15 10505 00009 
10528 49 09244 OOOOO 

10540 41 10576 OOOOO 
10552 15 10541 00009 
10564 49 09244 OOOOO 

10576 41 10612 OOOOO 
10588 15 10577 00009 
1060O 49 09244 0000Q< 

10612 41 10648 OOOOO 
10624 15 10613 00009 
10636 49 09244 OOOOO 

10648 41 10664 OOOOO 
10660 15 10649 00009 
10672 49 09244 OOOOO 

10684 49 10760 OOOOO 

10696 34 OOOOO 00102 
10708 39 lot 33 00100| 
10720 49 10760 OOOOO 
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SUMC 
SUMC 
♦♦23 

♦♦24 



08470^ 

08480 ER21 OAC 
08490^ 

08500^ THI 
08510* THE 

08520 RT019 TFM 

08530 AM 

08540 TO 

08550 BO - 

08360 B 

08570 BTM 

08580 BH 

08590 BTM E19N 

08600 BNE ♦♦24 

08610 BTM E19F 

08620 8NL ♦♦24 

08630 BTM E19N 

08640 H19A TFM SUMC 

08650 AM SUMC 

08660 TO ♦♦23 

08670 BO ^^24 

08680 B ^^24 

08690 BTM E19» 

08700 BH ^^24 

08710 BTM E19N 

08720 BNE ♦♦24 

08730 BTM E19F 

08740 ,Ri98 TFM SUMC 

08750 AM SUMC 

08760 BNE ^^24 

08770 BTM E19F 

08780 ,Ri9C TFM SUMC 

08790 AM SUMC 

08800 BNH ^^24 

08810 BTM E19F 

08820 BL ♦♦24 

08830 BTM E19F 

08840 -R19D TFM SUMC 

08850 AM SUMC 

08860 BH ♦♦24 

08870 BTM E19N 

08880 R19E TFM SUMC 

08890 AM SUMC 

08900 BH ♦♦24 

08910 BTM E19N 

08920 R19F TFM SUMC 

08930 AM SUMC 

08940 BNH ^+24 

08956 BTM E19F 

08960 6L ^^24 

08970 BTM E19F 

08980 R196 TFM SUMC 



14f ARITH TROUBLE* 
ROUTINE 19 
S ROUTINE CHECKS ADD IMMEDIATE (11) AND 
ARITHMETIC INDICATORS ll»12 AND 13 



10733 00028 



E19f3001f • 
♦♦24 



3*10* 
l»10t 
SUMCtr 
640»t 



ADD 03 AND 01 



3111»» 

3121.^ 

3131f « 
2»10* 
3»10# 
SUMCtf 
650,» 

♦ • 
2003 t» 

• » 

2113f • 

2123fi 
4tl0f 
2f 10« 
ft 

4122f« 

2*1011 » 
1»10# 
t • 

2111*8* 

♦ » 

2131*8t 
l*1011t 
2*10* 
» • 

1112*8* 

2*10* 

1*1011* 

• ♦' ■ 

2111*711* 

1*10* 

2fl011» 

* ♦ 

1112*711* 

1132*711* 
2*1011* 



ADD 02 AND 03 



ADD 04 AND 02 



ADD -02 AND 01 



(CHECK 



ADD -01 AND 02 



ADD 02 AND -01 



ADD 01 AND -02 



ADD -02 AND -01 



10760 

10772 

10784 

10796 

10808 

10820 

10832 

10844 

10856 

10868 

10880 

10892 

10904 

10916 

10928 

10940 

10952 

10964 

10976 

10988 

11000 

11012 

11024 

11036 

11048 

AND CI 

11060 

11072 

11084 

11096 

11108 

11120 

11132 

11144 

11156 

11168 

11180 
11192 
1120<> 
11216 
11228 
11240 
11252 
11264 

11276 
11288 
11300 
11312 



16 12033 
11 12033 
25 10807 
43 10820 
49 10832 

17 11732 

46 10856 
17 11780 

47 10880 
17 11852 
46 10904 
17 11780 

16 12033 
11 12033 
25 10951 
43 10964 
49 10976 

17 11732 

46 11000 
17 11780 

47 11024 
17 11852 

16 12033 
11 12033 
47 11072 
RCUIT 

17 11852 

16 12033 
11 12033 
47 11120 

17 11852 
47 11144 
17 11852 

16 12033 
11 12033 
46 11192 

17 11780 

16 12033 
11 12033 

46 11240 

17 11780 

16 12033 
11 12033 

47 11288 

17 11852 
47 11312 
17 11852 
16 12033 



000-3 
000-1 
12033 
00640 
00000 
-3001 
01100 
-3111 
01200 
-3121 
01300 
-3131 
000-2 
000-3 
12033 
00650 
00000 
-2003 
01100 
-2113 
01200 
-2123 
000-4 
000-2 
01200 

-4122 
OOO-K 
000-1 
01100 
OIClll 
01300 
0JC131 
000-J 
000-2 
01100 
0J112 
000-2 
000-J 
01100 
-211J 
000-1 
OOO-K 
01100 
-lllK 
O1300 
-113K 
OOO-K 
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08990 




AM 


SUMC»li 


.lOllf 




11324 


11 


12033 


000- J 


09000 




8NH 


♦-»-24#»i 






11336 


47 


11360 


01100 


09010 




BTM 


E19F»21 


Lll«811» 




11348 


17 


11852 


OKllJ 


09020 


R19H 


TFM 


SUMCa 


rIOll, 




11360 


16 


12033 


000-J 


09030 




AM 


SUMCt2i 


aOllt ADO 


-01 AND -02 


11372 


11 


12033 


OOO-K 


09040 




BNH 


«'(-24»»i 






11384 


47 


11408 


01100 


09050 




BTM 


E19F,11 


12t811 




11396 


17 


11852 


OJUK 


09060 


R19I 


TFM 


SUMC»\1 


101 It 




11408 


16 


12033 


GOO— 


09070 




AM 


5UMCt#] 


lOt • ADO 


-00 AND 00 


11420 


11 


12033 


000-0 


09080 




BNH 


♦♦24»ti 






11432 


47 


11456 


01100 


09090 




BTM 


E19F»01 


L10«6i 




11444 


17 


11852 


0-110 


09100 




BE 


•♦24»»i 






11456 


46 


11480 


01200 


09110 




BTM 


E19N»0] 


.20f8f 




11468 


17 


11780 


0-120 


09120 




BNL 


•♦24rf 1 






11460 


46 


11504 


01300 


09130 




BTM 


E19NtO] 


30»8» 




11492 


17 


11780 


0-130 


09140 


R19 J 


TFM 


SUMC«.] 


10* 




11504 


16 


12033 


000-0 


09150 




AM 


SUMC»»j 


LO, ADO 


00 AND 00 


11516 


11 


12033 


000-0 


09160 




BNH 


*424»#, 






11528 


47 


11552 


01100 


09170 




BTM 


E19F#01 


lOff 




11540 


17 


11852 


-0110 


09180 




BE 


♦+24»» 






11552 


46 


11576 


01200 


09190 




BTM 


E19N»01 


20, • 




11564 


17 


11780 


-0120 


09200 


R19IC 


TFM 


SUMC »2 


►lOllt 




11576 


16 


12033 


000-K 


0921O 




AM 


SUMCf2< 


»10» ADO 


-02 AND 02 


11588 


11 


12033 


000-2 


09220 




TNM 


*+24.ti 






11600 


47 


11624 


01100 


09230 




BTM 


E19F»2] 


Il2t8# 




11612 


17 


11852 


0)C112 


09240 




BE 


»4.24»»( 






11624 


46 


11648 


01200 


09250 




BTM 


E19N»2] 


I22»8f 




11636 


17 


11780 


0K122 


09260 


RIVL 


TFM 


SUMC»1 


>10» 




11648 


16 


12033 


000-1 


09270 




AM 


SUMCf li 


»1011f ADO 01 AND -01 


11660 


11 


12033 


000-J 


09280 




BNH 


♦"».24»»i 






11672 


47 


11696 


01100 


09290 




BTM 


E19F»11 


:ll»711r 




11684 


17 


11852 


-lUJ 


09300 




BE 


*'»-24t » ) 






11696 


46 


11720 


01200 


09310 




BTM 


E19N»11 


i21»711» 




11708 


17 


11780 


-112J 


09320 




B 


RT020M 






11720 


49 


12298 


00000 


09330 


ei9 


RCTY 


• • ♦ 






11732 


34 


00000 


00102 


09340 




WATY 


ER55»» 






11744 


39 


12257 


00100 


09350 




TF 


DT19*E: 


19-1 




11756 


26 


12039 


Ut31 


09360 




B 


00E19» 






11768 


49 


11912 


00000 


09370 


tl9N 


RCTY 


» ♦ » 






11780 


34 


00000 


00102 


09380 




TF 


0T19fE: 


19N-It» 




11792 


26 


12039 


11779 


09390 




WATY 


ER58»t, 






11804 


39 


12175 


00100 


09400 




TF 


ET19-1^ 


iE19N-2f f 




11616 


26 


12048 


11778 


09410 




WNTY 


ET19-2i 


> * « 




11828 


38 


12047 


00100 


09420 




B 


D0E19 






11840 


49 


11912 


00000 


09430 


ri9F 


RCTY 


f f • 






11852 


34 


00000 


00102 


09440 




TF 


DT19»E] 


19F-1 




11864 


26 


12039 


11851 


09450 




WATY 


ER57 






11876 


39 


12093 


00100 


09460 




TF 


ET19-1« 


►E19F-2., 




11888 


26 


12048 


11850 


09470 




WNTY 


ET19-2/ 


*9 r ;■ 




11900 


36 


12047 


00100 


09480 


00E19 


RCTY 








11912 


34 


00000 


00102 


09490 




TO 


ETAl-1, 


►0T19», 




11924 


25 


12041 


12039 


09500 




TD 


rTA2-li 


►DT19-3»# 




11936 


25 


12044 


12036 


095^10 




WATY 


tR56»» 






1194B 


39 


12051 


00100 
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09520 


WNTY 


ETA2-2«f 




11960 


38 12043 


00100 


09530 


WATY 


PLS » i f 




11972 


39 12283 


00100 


09540 


WNTY 


ETAl-2»»» 




11984 


38 12040 


00100 


09550 


WATY 


EO»t» 




11996 


39 12291 


00100 


09560 


WNTY 


SUMC-lt»t 




12008 


38 12032 


00100 


09570 


BB 


• • # 




12020 


A2 00000 


00000 


09580* 


CONSTANTS FOR ROUTINE 


19 






09590 SUMC 


DC 


2»00 




12033 


00002 




09600 


DC 




■ ■ - ■ 


12034 


00001 




09610 0T19 


DC 


5fOOO0Q 




12039 


00005 




09620 ETAl 


DC 


3* 00* 




12042 


00003 




09630 ETA2 


DC 


3»00« 




12045 


00003 




09640 ET19 


DC 


4f000« 




12049 


00004 




09650 ER56 


DAC 


21 • ADD IMMEDIATE 


(11) • 


12051 


00042 




09660 ER57 


DAC 


41* INDICATOR OH* 


SHOULD BE OFF* 


INDICATOR • 

12093 


00082 




09670 ER58 


DAC 


41t INDICATOR OFFt 


SHOULD BE ON* 


INDICATOR • 

12175 


00082 




09680 ER55 


DAC 


13* ADD ERROR* • 




12257 


00026 




09690 PtS 


DAC 


04* ♦ • 




12283 


00008 




09700 EO 


DAC 


04* • • 




12291 


00008 




09710» 




ROUTINE 20 










09720« 


THl 


S ROUTINE TESTS COMPARE IMMEDIATE 


(14) 






09730 RT020 


fFM 


WA20,15*10» 




12298 


16 12827 


0O0J5 


09740 


CM 


WA20tl9.l0* 




12310 


14 12827 


000J5 


09750 


TO 


♦♦23*WA20»» 




12322 


25 12345 


12827 


09760 


BD 


E20»650f»t 




12334 


43 12514 


00650 


09770 


TD 


♦♦35*WA20-lt* 




12346 


25 12381 


12826 


09780 


CF 


♦•►23**f 




12358 


33 12381 


00000 


09790 


BD 


E20»6lO*t 




12370 


43 12514 


00610 


09800 


BE 


♦♦60* f» 




12362 


46 12442 


01200 


09810 


RCTY 


» • • 




12394 


34 00000 


00102 


09820 


WATY 


ER59*** 




12406 


39 12829 


00100 


09830 


WATY 


ER6Q»»» 




12419 


39 12859 


00100 


09840 


H 






12430 


48 00000 


00000 


09850 


BNH 


♦•»"60t** 




12442 


47 12502 


01100 


09860 


RCTY 


» * • 




12434 


34 00000 


00102 


09870 


WATY 


ER59.»* 




12466 


39 12829 


00100 


09880 


WATY 


ER61*** 




12478 


39 12909 


00100 


09890 
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BE 
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BNH 
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12829 
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10070 
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39 


13069 
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12706 
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10110 
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12730 
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10120 
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46 
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13176 
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CONSTANTS USED IN ROUTINE 20 










10200 


WA20 


DC 


02»00 


12827 


00002 




10210 


ER59 


DAC 


15 » CM ( 14) ERROR* 


12829 


00030 




10220 


ER60 


OAC 


25» EQUAL ZERO SHOULD BE 0N» 


12859 


00050 




10230 


ER61 


DAC 


29f HIGH POSITIVE SHOULD BE OFF* 


12909 


00058 




10240 ER62 


OAC 


25« CM M4r ALTERED P FIELD* 


12967 


00050 




1C250 


ER63 


OAC 


t6f EQUAL ZERO SHOULD BE OFF* 


13017 


00052 




10260 


ER64 


OAC 


28t HIGH POSITIVE SHOULD BE 0N» 


13069 


00056 




10270 


ER65 


OAC 


26* HIGH /EQUAL SHOULD BE OFF« 


13125 


00052 
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ROUTINE 21 
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13176 
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13423 


13410 


10310 
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10320 
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13223 
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10330 
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13212 


43 


X3260 


00640 


10340 
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13224 
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13308 
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10350 
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13236 
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13356 
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10360 
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13248 
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13284 


48 


00000 


OOOOO 


10400 
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13320 


39 


13473 


00100 


10430 
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10450 


E21C 


RCTY 


• ft 


13356 


34 


OOOOO 
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10460 




WATY 


ER68ff f 


13368 
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10470 




H. ■ : 
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13380 


48 
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13423 
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OAC 
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13425 
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ER67 
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33f C (24» ERRORf E/2 SHOULD BE OFF* 


13473 
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32»,C«24r ERROR* H/P SHOULD BE ON* 
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AAA*0l234 
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14070 
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BE 


#448 
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10820 
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14070 
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14072 
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15360 
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14084 
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BNR 
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11040 
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15357 


00100 


11050 


WATY 


5B#»f 










14160 


39 


15463 


00100 


11060 


WNTY 


D24A»«t 










14192 


38 


15363 


00100 
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H : 












14204 


48 
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00000 


11080^ 
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14216 


49 
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U090 ER24:t RCTY U228 34 OOOOO 00102 

lllOO V WATY ER75»tt 14240 39 15501 OOlOO 

111 10 H 14252 4$ OOOOO OOOOO 

11120 B R24A.»» 14264 49 14312 OOOOO 

11130 ER24ARCTY »♦» 14276 34 OOOOO 00102 

11140 WATY ER76 14280 39 15567 00100 

11150 H 14300 48 OOOOO OOOOO 

11160» ' 

11170 R24A TfM WA24t«ff 14312 16 15360 -0000 

11180 TR WA24-2t02*B»» TRANSMIT 2 DIGITS EVEN 14324 3i 15358 15368 

ni^O; BNR CR24B#WA24f» 14936 45 14468 15360 

11200 80 ER24C»WA24*lf • 14348 43 14516 15361 

11210 CM WA24-1«14*8« 14360 14 15359 0-014 

11220 BE R248,»# 14372 46 14552 01200 

11230. RCTY f»« 14384 34 OOOOO 00102 

11240 WATY ER74»»» 14396 39 15381 00100 

11250 WNTY WA24-2»f» 14408 38 15358 00100 

11260 WATY S0»t» 14420 39 15463 00100 

11270 WNTY 024B#ff 14432 38 15368 00100 

11280 M 14444 48 OOOOO OOOOO 

11290 ® R24B»f» 14456 49 14552 OOOOO 

11300 ER24B RCTY 14468 34 OOOOO 00102 

11310 WATY ER75»»f 14480 39 15501 00100 

11320 H 14492 48 OOOOO OOOOO 

11330 B R24B»»f 14504 49 14552 00000 

11340 ER24C RCTY »•» 14516 34 OOOOO 00102 

11350 WATY ER76».t 14528 39 15567 OOiOO 

11360 M #•§ 14540 48 OOOOO OOOOO 
11370»- 

11380 R24B TFM WA24»t# 14552 16 15360 *0000 

11390 TR WA24-4»D24Ciif 14564 31 15356 15372 

11400 BHR ER24D»WA24-lf ♦ 14576 45 14696 15359 

11410 CM WA24-2»579f9t 14588 14 15358 00N79 

11420 BE R24Cf»# 14600 46 14732 01200 

11430 RCTY 14612 34 OOOOO 00102 

11440 WATY ER74»»f 14624 39 15381 00100 

11450 WNTY WA24-4f»» 14636 38 15356 00100 

11460, WATY S8#ff 14648 39 15463 00100 

1147Q. WNTY 024C»»f 14660 38 15372 00100 

11480 H 14672 48 OOOOO OOOOO 

11^90 0 R24C»#f 14684 49 14732 OOOOO 

11500. ER24D RCTY #•« 14696 34 OOOOO 00102 

U5i0 WATY ER75#»r 14708 39 15501 00100 

11520 H 14720 48 00000 00000 
. 11530*- 

11540< R24C TFM WA24*»» 14732 16 15360-0000 

11550 TR WA24-2#0240»r 14744 31 15358 15376 

11560 BNR ER24E»WA24-lir 14756 45 148T6 15359 

11570 CM WA24-2f8»9t 14768 14 15358 00-08 

11580' BE R240«tr 14780 46 14912 01200 

11590 RCTY 14792 34 OOOOO 00102 

11600 WATY ER74»f» 14604 39 15381 00100 

11610 WNTY WA24-2»tt 14816 38 15356 00100 
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PROPEKLYt 


WAS « 
























15381 


00082 




12220 


SB 


DAC 


19» SHOULD HAVE 


BEEN • 






15463 


00038 




12230 


ER75 


DAC 


33» TR (31) DID 


NOT 


SET 
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6.0 RELEASED DIPAL COMPATIBLE TESTS 
Diagnostic Name DIPAL Name Using System 
- 1620-I 1620~II 



Features 
1710-1 1710-.II Tested 



CU 02 


CU 02 


X 




- -X 




Validity 


DT 0010 


DT 10 




.. . •■ • ••■ • ." { ■ 


X 


X 


rtc/mes 


DT 0011 


- DT 11 " 






X 


X 


ADC 


DT 0012 


DT 12 






X 




TAS 


DT 0013 


DT 13 






■ X ■/ 




CO/PBI/A0 


DT OOl'l 


DT 14 






X 


X 


Interrupt 


DT 0015 


DT 15 






X 




Seek Complete 


DT 001/ 


DT 17 






X 




MEU/UDU/SSU 


DT 0018 


DT 18 






X 




Output Printer 


DT 0019 


DT 19 






X 


X 


uses 


DT 0021 


DT 21 


«... 
X 


. .. X 


■ ■ ■ V 


V 
A 


1311 


DT 0022 


DT 22 


X 


X 


X 


X 


1 1 1 
1311 


DT 0041 


DT 41 






X 


X 


FL/FD/LLfd/UL/ 














■DTP /PM 


DT 0042 


T\nt lit 

DT 42 






X 


' V 
A 




DT 0043 


DT 43 r 


X 


X 


X 


X 


1 'till "1 _ • _^ j_i _. • ■. 

1443 Printer 


DT 0101 


0101 




X 




X 


) Central 


DT 0102 


0102 




X 




X 


) Processing 


DT 0103 


0103 




X 




X 


) Unit 


DT €104 


0104 




X 




X 


Validity 


DT 0105 


0105 




X 
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Index Registers 


DT 0106 


0106 


X 


X 


X 
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Floating Point 


DT 0107 


0107 
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Binary 














Capabilities 


DT 0108 


0108 




X 
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Binary I/O 


DT 0109 


0109 




X 
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Typewriter 


DT 0110 


0110 




X 
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Paper Tape 


DT 0112 


D112 
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TAS 
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D113 
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Output Printer 
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DXOl 


X 




X 




CPU Header 


DTX 02 


DX02 


x 




X 




CPU Header 


DTX 03 


DX03 


X 




X 




Typewriter 


DTX (DM 


DX04 


X 




X 




Special 














Instructions 


DTX 06 


DX06 


X 




X 




Indirect 














Addressing 
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